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What Version? 


As of December 1982, the compatibility of system software 
is indicated by the revision number included in the soft- 
ware’s name. The revision number has a digit to the left and 
right of a decimal point. The digit to the left of the decimal 
point indicates the “‘level” of the system. System software 
files are compatible with one another if they have matching 
‘‘level’’ numbers. For example, a binary file (referred to as a 
BIN’) named ‘“ABC4.3” would be compatible with BASIC 
4.0 because they both have “4” as the leading digit. The 
digit to the right of the decimal point indicates the revision 
number of that particular piece of code. Thus, '‘XYZ4.1” 
would be an updated version of “XYZ4.0" and replaces the 
old version. 


The language’s version is displayed on the CRT at power-up. 
BASIC 4.0 gives the following message: 


BASIC Ready 4.0 


If a numeric version code (3,0 in the example) is not shown, 
then BASIC 1.0 is resident. Loading a BIN file with LOAD 
BIN produces a message similar to the following, where I0 is 
the BIN file that is loaded: 


BASIC 10 4,0 {c) Copyright HP 1985 


IV 
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Data Types 


VO path A combination of firmware and hardware that 
can be used for the transfer of data to and from a BASIC 
program. Associated with an I/O path is a unique data type 
that describes the I/O path. This association table uses about 
200 bytes and is referenced when the I/O path name is used. 


INTEGER A numeric data type stored internally in two 
bytes. Two’s-complement representation is used, giving a 
range of —32 768 thru +32 767. 


REAL A numeric data type that is stored internally in eight 
bytes using sign-and-magnitude binary representation. One 
bit is used for the number’s sign, 11 bits for a biased expo- 
nent (bias = 1023), and 52 bits for a mantissa. On all values 
except zero, there is an implied ‘1.’ preceding the mantissa 
(this can be thought of as the 53rd bit). Approximated to 
four digits, the range of REAL numbers is: 


- 1.798 E +308 thru — 2.225 E ~ 308, 0, and 
+ 2.225 E-308 thru + 1.798 E+ 308. 


lf a numeric variable is not explicitly declared as an INTE- 
GER, it is a REAL. 


string A data type comprised of a contiquous series of 
characters. Each character in the string is stored in one byte 
using an extended ASCII character set. The first character in 
a string is in position 1. The maximum length of a string is 
32 767 characters. The current length of a string can never 
exceed the dimensioned length. 


If a string is not explicitly dimensioned, it is implicitly dimen- 
sioned to 18 characters. Each element in an implicitly 
dimensioned string array is dimensioned to 18 characters. 


When a string is empty, it has a current length of zero and is 


called a ‘‘null string’. All strings are null strings when they 
are declared. 
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Expression Evaluation 


Operators 


Dyadic 











Opeiatee | Operation 
+ | REAL or INTEGER addition 
- REAL or INTEGER subtraction 
* ; REAL or INTEGER multiplication 
/ | REAL division 
° | Exponentiation 
& String concatenation 
DIV ; Gives the integer quotient of a division 
MCD | Gives the remainder of a division 
MODULO | Gives the remainder of a division, similar to 
; MOD 
= | Comparison for equality 
| Comparison for inequality 
Comparison for less than 
» Comparison for greater than 
2 | Comparison for less than or equal to 
DS | Comparison for greater than or equal to 
AND | Logical AND 
OR Logical inclusive OR 
EXOR | Logical exclusive OR 
Monadic | . 
Onecainr | Operation 
- | Reve the sign of an expression 
+ | Identity operator 
NOT | Logical complement 
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Math Hierarchy 


Operators of equal precedence are evaluated left-to-right. 





Precedence Operator 


High 


Parentheses: (may be used to force any order 
of operations} 


i 
| Functions, user-defined and machine-resident 
| Exponentiation 

| Multiplication and division 

| Plus and minus (monadic and dyadic} 
Relational operators 

i 


NOT 


» AND 


Low | OR EAOQR 


String Hierarchy i 


Precedence Operator 


High | Parentheses 


Substrings and functions 
Low Concatenation 


Substrings 


The beginning position must be at least one and no greater 
than the current length plus one. The ending position must 
be no less than the beginning position minus one and no 
greater than the dimensioned length of the string. The max- 
imum substring length must be at least zero and no greater 
than one plus the dimensioned length of the string minus the 
beginning position. (See drawing.) 


Numeric Expression 
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subscript 





Simplified Graphics Mapping 
VIEWPORT. specified in Graphics Display Units {(GDU), de- 
fines the area of the screen into which a coordinate system 
defined by WINDOW or SHOW is mapped. 


WINDOW specifies a coordinate system, measured in User 
Defined Units (UDU}), that is mapped into the area defined 
by VIEWPORT. The X and Y bounds specified in a WIN- 
DOW statement are placed exactly on the VIEWPORT 
bounds, and the aspect ratio of the coordinate system is ad- 
justed accordingly (anisotropic view). 








SHOW is similar to WINDOW, except the range of the spe- 
cified coordinate system is adjusted by the computer to 
maintain equal-sized UDUs on both axes {isotropic view). 





parameter 


RATIO * 106 GDU’s 
Fn tnd 


hard clip 
limits 
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Simplified Color Model 


PLOTTER IS...;COLOR MAP enables the color map mode. 
The color map must be enabled to use the SET PEN state- 















HSL Color Space 


ment. 












CYAN 















HUE = 3/6 
PEN selects a color to be used for subsequent lines, charac- Seek ipthe 
HUE = 26 
ters, and edges. SAT=4 WHITE BLUE 
LUM=14 SATURATION =0 HUE =e5 





LUMINOSITY =14 SAT =1 
LUM=14 


SET PEN defines the color displayed on the CRT when a 





YELLOW 














given pen selector is used. Secondary keywords COLOR ee neeace 
and INTENSITY select the color model to be used (see LUM =1 ioe Hue 


below}. LUM=1 







DESIRED 
COLOR ae SATURATION 


Ee, 


AREA defines and/or selects the color to be used for filling 
polygons, array plots, and rectangles. COLOR and IN- 
TENSITY select the color model to be used (see below). 
Secondary keyword PEN selects a pen to be used, instead of 
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dithered colors. BLACK LUMINOSITY aiKes 
SATURATION = 1 Pe SATURATION 
LUMINOSITY =6 =e 
LUMINOSITY =o 


..COLOR selects the HSL color model. The HSL models 
uses coordinates in a cylindrical color space, with the axes 
being Hue, Saturation, and Luminosity. See the drawing on 
the next page. 


_. INTENSITY selects the RGB color model. The RGB mod- 
el uses coordinates in a cartesian color space, with the axes 
being Red, Green, and Blue. 
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Glossary 


array A structured data type that can be of type REAL. 
INTEGER, or string. Arrays are created with the DIM. REAL. 
INTEGER, ALLOCATE, or COM statements. Arrays have 1 
to 6 dimensions; each dimension is allowed 32 767 ele- 
ments. The lower and upper bounds for each dimension 
must fall in the range ~ 32 767 (-—32 768 for ALLOCATE) 
thru +32 767, and the lower bound must not exceed the 
upper bound. The default lower bound is the OPTION 
BASE value; the OPTION BASE statement can be used to 
specify 0 or 1 as the default lower bound. The default OP- 
TION BASE at power-on or SCRATCH A is zero. 


Each element in a string array is a string whose maximum 
length is specified in the declaring statement. The declared 
length of a string must be in the range 1 thru 32 767. 


To specify an entire array, the characters (*) are placed af- 
ter the array name. To specify a single element of an array, 
subscripts are placed in parentheses after the array name. 
Each subscript must not be less than the lower bound or 
greater than the upper bound of the corresponding dimen- 
sion. 


If an array is not explicitly dimensioned, it is implicitly given 
the number of dimensions used in its first occurrence, with 
an upper bound of 10. Undeclared strings have a default 
length of 18. 


command A statement that is executed from the keyboard 
input line. (Also see “‘statement’’.) 


context An instance of an environment. A context consists 


of a specific instance of all data types which may be acces- 
sed by a program at a specific point in its execution. 
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device selector A numeric expression used to specify the 
source or destination of an I/O operation. A device selector 
can be either an interface select code or a combination of an 
interface select code and a primary address. To construct a 
device selector with a primary address, multiply the interface 
select code by 100 and add the primary address. 


Secondary addresses may be appended after a primary 
address by multiplying the device selector by 100 and 
adding the address. This may be repeated up to 6 times, 
adding a new secondary address each time. A device selec- 
tor, once rounded, can contain a maximum of 15 digits. 


When a device selector contains an odd number of digits, 
the leftmost digit is the interface select code. For an even 
number of digits, the leftmost two digits are the interface 
select code. For example, 70502 selects interface 7, primary 
address 05, and secondary address 02. Device selector 1516 
selects interface 15 and primary address 16. 


file name A file name consists of one to ten characters. 
Valid file names can contain uppercase letters, lowercase let- 
ters, numerals, the underscore {_), and CHR$(161) thru 
CHR$(254). LIF-compatible file names can contain only up- 
percase letters and numerals. The first character in a LIF- 
compatible file name must be a letter. 


function A procedural call that returns a value. The call 
can be to a user-defined-function subprogram (such as 
FNIinvert} or a machine-resident function (such as COS or 
EXP). The value returned by the function is used in place of 
the function call when evaluating the expression containing 
the function call. A function is considered numeric if it re- 
turns a numeric quantity. 


1] 





interface select code A numeric expression that selects an 
interface for an I/O operation. Interface select codes 1 thru 7 
are reserved for internal interfaces. Interface select codes 8 
thru 31 are used for external interfaces. The internal HP-IB 
interface with select code 7 can be specified in statements 
that are restricted to external interfaces. (Also see ‘‘device 
selector ’.) 


msus_ This is the acronym for ‘‘mass storage unit specifier’. 
It is a string expression that specifies a device to be used for 
mass storage operations. 


name A name consists of one to fifteen characters. The 
first character must be an uppercase ASCII letter or one of 
the characters from CHR$(161) thru CHR$(254). The re- 
maining characters, if any, can be lowercase ASCII letters, 
numerals, the underscore {_}, or CHR$(161) thru 
CHR$(254). Names may be typed using any combination of 
uppercase and lowercase letters, unless the name uses the 
same letters as a keyword. Conflicts with keywords can be 
resolved by mixing the letter case in the name. (Also see 
“file name’’.) 


primary address A numeric expession in the range of 0 
thru 31 that specifies an individual device on an interface 
which is capable of servicing more than one device. The HP- 
IB interface can service multiple devices. (Also see ‘‘device 
selector’.} 


program line A statement that is preceded by a line num- 
ber (and an optional line label) and stored into a program. 
(Also see “‘statement’’.) 


recursive See the BASIC Language Reference. 
secondary address A device-dependent command sent on 
HP-IB. it can be interpreted as a secondary address for the 


extended talker/listener functions or as part of a command 
sequence. (Also see “device selector’’.) 


IZ 





statement A keyword combined with any additional items 
that are allowed or required with that keyword. If a state- 
ment is placed after a line number and stored, it becomes a 
program line. If a statement is executed from the keyboard 
input line, it is called a command. 


subprogram Can be either a SUB subprogram or a user- 
defined function subprogram (DEF FN). The first line in a 
SUB subprogram is a SUB statement. The last line in a SUB 
subprogram (except for comments) is a SUBEND statement. 
The first line in a function subprogram is a DEF FN state- 
ment. The last line in a function (except for comments) is an 
FNEND statement. Subprograms must follow the END state- 
ment of the main program. 


SUB subprograms are invoked by CALL. Function subprog- 
rams are invoked by an FN function occurring in an express- 
ion. A function subprogram returns a value that replaces the 
occurrence of the FN function when the expression is evalu- 
ated. Either type of subprogram may alter the values of pa- 
rameters passed by reference or variables in COM. 


Invoking a subprogram establishes a new context. The new 
context remains in existence until the subprogram is properly 
exited or program execution is stopped. Subprograms can 
be recursive. 


subroutine A program segment accessed by a GOSUB state- 
ment and ended with a RETURN statement. 
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ALLOCATE 


This statement dynamically allocates memory for arrays and 


string variables during program execution. See DEALLO.- 
CATE. 


ALLOCATE Temp(Low:High) 

ALLOCATE INTEGER Array (Index 4248) 
ALLOCATE RSCLEN( A$} +1] 

ALLOCATE Text$(Lines)(80] 


ALPHA 


Keywords 


A 
ABORT Requires IO 


This statement ceases HP-IB activity. When system control- 
ler but not active controller, ABORT causes the computer to 
assume active control. 


Requires GRAPH 
ee This statement turns the alphanumeric display on or off. The 
ae ek THEN ABORT @Source statement has no effect on the contents of the alpha mem- 

- ory, it just controls whether it is displayed or not. 
ABORTIO Requires TRANS ALPHA ON 


TF Graeh THEN ALPHA OFF 


AND 


This operator returns a 1 or a 0 based upon the logical AND 
of the arguments. 


This statement terminates a TRANSFER which is taking 
place through an I/O path. The I/O path named in the state- 
ment must be assigned to a file or device, not a buffer. 





ABORTIO 8Isc . 
IF Stop_filag THEN ABORTIO Device 


ABS 


This function returns the absolute value of its argument. 


IF Flag AND Test2 THEN Process 
Final=Initial AND Walid 


AR EA Requires GRAPHX 


This statement defines or selects an area fill color. See SET 
PEN for a color table. 


AREA COLOR Hue sSaturationsLuminosity 
AREA INTENSITY Red(I) sGreen(I)sBlue(1) 
BREA PEN 3 


ASCII 
See CREATE ASCII and LEXICAL ORDER IS. 


ASN 


Magnitude=ABS (Vector) 
PRINT "Value ="FABS(X1) 


ACS 


This function returns the principal value of the angle which 
has a cosine equal to the argument. This is the Arccosine 
function. 


Angle=ACS(Cosine) _. 
PRINT "Angle ="sACS(K1) ' 





soon This function returns the principal value of the angle which 
| has a sine equal to the argument. This is the Arcsine func. 
ened = tiOn. 

TL 


Angle=ASN(Sine) 
PRINT "“@Angle ="SPSNCON]1) 





@ 
is 
3 
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ASSIGN 


This statement assigns an l/O path name and attributes to a 
device, group of devices, a mass storage file, or a buffer. 
Without TRANS or IO, the only attribute allowed is 
FORMAT. 


ASSIGN @File TG NameS&Msus$ 
ASSIGN @8Scurce TO IsciFORMAT OFF 
ASSIGN @Listeners TO 7ils»712,715 
ASSIGN @ChangeiFORMAT ON 

ASSIGN @Cilose TO * 


Requires TRANS 


ASSIGN @Buffer TO BUFFER Strings 
ASSIGN @Buf TO BUFFER Array(#) 
ASSIGN @Buff2 TO BUFFER [48000] 


Requires [O 


ASSIGN @Path TQ FileSsRETURN Qutcome 

ASSIGN @Port TO GpioikORD 

ASSIGN @Dest TO Rs_232:E0L My$ DELAY .t> 
CONVERT OUT BY INDEX Out$sPARITY ODD 

ASSIGN @PathiBYTE 


ATN 


This function returns the principal value of the angle which 
has a tangent equal to the argument. This is the Arctangent 


function. 

Angle=ATN( Tangent) 

PRINT "Angle ="3ATNCOKL) 

AXES Requires GRAPH 


This statement draws a pair of axes, with optional, equally- 

spaced tick marks. 

AKES 10710 

AKES KreYoMidx sMidy pMaxx/1OsMaxy/1i0 

AXES KspacesYspacerXlocyvs¥Ylocxr+xmavors 
YnasoreMasorsize 
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B 
BASE Requires MAT 


This function returns the lower subscript bound of a dimen- 
sion of an array. 


Lowerbound=BASE(Arrar Dimension) 
Upperbound(2)2BASE(G,2)+SIZE( As?) -1 


BDAT 
See CREATE BDAT. 


BEEP 


This statement produces one of 63 audible tones. 


BEEP 
BEEP Frea-Duration 
BEEP B81,.38*Tone;Seconds 


BIN 
See LIST, LOAD, and SCRATCH. 


BINAND 


This function returns the value of a bit-by-bit logical-and of 
its arguments. 


LowlG_bits=BINAND( Byte s15) 
IF BINAND(Stat+3) THEN Bit_set 


BINCMP 


This function returns the value of the bit-by-bit complement 
of its argument. 


True=BINCMP( Inverse) 
PRINT XsBINCMP(X) 


BINEOR 


This function returns the value of a bit-by-bit exclusive-or of 
its arguments. 


Tog¢le=BINEQR(Togsle:t) 
Truoe_byte=BINEQR( Inverse byte:255) 


Ly 
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BINIOR 


This function returns the value of a bit-by-bit inclusive-or of - 


its arguments. 


Bits set=BINIOR(Valuel Valued) 
Top_bit_on=BINIOR(ALL_bits :2°15) 


BIT 


This function returns a 1 or O representing the value of the 
specified bit of its argument. The least-significant bit is bit 0. 


Flag=BIT( Info.) 
IF BiT({WordsTest) THEN PRINT "Bit #"3 
Testi"is set” 


BREAK 


This statement directs a serial interface to send a break sequ- 


Requires 1O 


ence. 


BREAK 9 
BREAK BDatacomm 


BUFFER 


See ASSIGN, COM, DEF FN, DIM, INTEGER, REAL, and 
SUS: 


BYTE 
See ASSIGN. 


18 





C 
CALL 


This statement transfers program execution to the specified 
SUB (or CSUB) subprogram and may pass parameters to 
the subprogram. 


CALL Process(Referencer(Value) +@Path) 
CALL Transform(Arrary(#)) 
Parse(String$(Line)(B]+PointertOffser) 
ON END @File CALL Sortnumbers 

IF Flag THEN CALL Special 


CASE 
See SELECT...CASE. 


CAT 


This statement lists the contents of the mass storage media's 
directory. With MS, portions of the directory may be 
selected, the information may be sent to a string array, or 
information about a PROG file may be requested. 


CAT 

CAT TO #701 

CAT ":INTERNAL +451” 
CAT Msus# TO #12 


Requires MS 


CAT TO String$(*#)3NO HEADER 
CAT Prog_file_names 
CATISELECT "C*™:SKIP First ,COUNT Retnovar 


Requires SRM and MS 


The following use of the CAT statement lists all the pass- 
words for a file if a MANAGER password is supplied. Works 
only for SRM files. 


CAT “MrFile<MgrProtctCode >" PROTECT 
CAT "MyFile<MgrPC0>" TO Cats(#*#) +PROTECT 
CAT "MyFile<MgrPC>” TO #7013 PROTECT 
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CHANGE Requires PDEV 


This program editing command allows search-and-replace 
operations. 

CHANGE “Old Text” TO “New Text” 

CHANGE "Row" TO “Column IN 2560,3310 

CHANGE “November” TO “December"sALe 


CHECKREAD Requires MS 


This statement enables or disables optional read-after-write 
veritication of data sent to mass storage media. 


CRHECKREAD ON 
CHECKREAD OFF 


CHR$ 


This function converts a numeric value into an ASCII charac- 
ter. The low-order byte of the 16-bit integer representation 
of the argument is used; the high-order byte is ignored. A 
table of ASCII characters and their decimal equivalent values 
is in the back of this book. 
Lowercases=CHRS(NUM(Uppercase$) +32) 
AS(Markersi]=CHRS(Digit+128) 

Esct=CHRS(27) 


CLEAR 


This statement allows the active controller to put HP-IB de- 
vices into a device-dependent state. 


Requires 1O 


CLEAR 7 
CLEAR Voltmeter 
CLEAR Source 


CLIP Requires GRAPH 


This statement redefines the soft clip area, enables, or dis- 
ables the soft clip limits. 


CLIP Left sRight+BottomsTop 
CLIP QN 
CLIP OFF 


CMD 
See SEND. 


20 








t 
' 


COLOR 


See AREA and SET PEN. For COLOR MAP, see PLOTTER 
IS. 


COM 


This statement dimensions and reserves memory for vari- 
ables in a special ‘‘common’’ memory area so more than 
one program context can access the variables. 

COM Aa te 

COM /Block/ Text$,@PathsINTEGER Points(+#) 


COM INTEGER To J+REAL Array(-128:127) 
COM Buffy$f{1024] BUFFER 


CONT 


This command resumes execution of a paused program at 
the specified line. If no line is specified, execution resumes at 
the line pointed to by the program counter. 


CONT 


CONT 380 
CONT Sort 


CONTROL 


This statement sends control information to an interface or 
to the internal table associated with an I/O path name. 


CONTROL BRand file »7iFile length 
CONTROL {tiRowsColuamn 
CONTROL Interface RegisteriValue 


CONVERT 
See ASSIGN. 


COPY 


This statement allows copying of individual files or entire 
discs. When an entire disc is copied, all old files on the des- 
tination disc are destroyed. 

COPY Old_file# TO New_file$ 

COPY "MY_FILE" TO "TEMPépo>sHP9895,.700,1" 

COPY ":INTERNAL” TO “: INTERNAL s4s1" 

COPY Intudisce$ TO Ext idise$ 
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COPYLINES Requires PDEV 


This program editing command copies contiguous program 
lines from one location to another. If only one line identifier 
is specified, only that line is copied. 


COPYLINES 1200 TO 3255 
COPYLINES {10,120 TO 300 
COPYLINES Labell;Label2 TO Latei3 


COS 


This function returns the cosine of the argument. 


Cosine=COS(Angle) 
PRINT COQS(4+45) 


COUNT 
See CAT and TRANSFER. 


CREATE ASCII 


This statement creates an ASCII file of specified length on 
the mass storage media. 


CREATE ASCII "TEXT" s100 
CREATE ASCII Namet&Msust Sectors 


CREATE BDAT 


This statement creates a BDAT file of specified length on the 
mass storage media. 


CREATE BOAT “George” 48 
CREATE BDAT “ABC< PC" Records Record len 
CREATE BDAT NameS&MsusS Bytes ri 


CREATE DIR Requires SRM 


This statement creates a directory file in either the current 
working directory or the specified remote directory of a 
Shared Resource mass storage device. 


CREATE DIR "“NEWLDIR_1.1" 
CREATE DIR "/USERS/SMITH/Jots” 
CREATE DIR “../brother" 
CREATE DIR "../brother/nerhew" 
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CRT 


This function returns 1, the device selector of the CRT. 


PRINTER IS CRT 
ENTER CRT iArray$(#} 


CSIZE Requires GRAPH 


This statement sets the size and aspect (width: height) ratio of 
the character cell used by the LABEL statement. 


CSIZE 190 
CSIZE 5:0,.6 
CSIZE Sizer+Width/Hei ght 


CSUB 


CSUB statements are created in Pascal using a special 
CSUB preparation utility. When viewed in BASIC’s edit 
mode, they look like SUB statements. CSUBs cannot be 
edited from BASIC. 


CSUM 
See MAT. 


CYCLE 
See OFF CYCLE and ON CYCLE. 


D 
DATA 


This statement contains data which can be read by READ 
statements. 


DATA $+1,41451,.73272 
DATA wordi word? +word3 
DATA" ex-pointl tl) "s"auote(*")","commal +) ® 
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DATE Requires CLOCK 


This function converts a formatted date string into a numeric 
value in seconds. 


PRINT DATE("30 MAY 1983") 
Days=(DATE(Dav1$)-DATE(Dav2$)) DIV 86400 


DATES$ Requires CLOCK 


This function formats a number of seconds into a string rep- 
resenting the formatted date (DD MMM YXYY). 


PRINT DATES(TIMEDATE) 
Dayis=DATEt( Eventi) 


DEALLOCATE 


This statement deallocates memory space reserved by the 
ALLOCATE statement. 


DEALLOCATE A$:B%:C$ 
DEALLOCSTE Text$(#) 
DEALLOCATE Array(¥#) 


DEF FN 


This statement indicates the beginning of a function sub- 
program. It also indicates whether the function is string or 
numeric and defines the formal parameter list. 


980 END 

DOO. <f 

1000 DEF FNNewS(String$) 
1126 RETURN &$ 

1130 FNEND 


DEE FNXform(@PtreINTEGER A(*) BUFFER: 
OPTIONAL Text) 


DEF FNExtract(BufS BUFFER Pointer) 
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DEG 


This statement selects degrees as the unit of measure for ex- 
pressing angles. Radians are assumed unless a DEG state- 
ment is executed. 


DEG 


DEL 


This command deletes program lines. If only one line identi- 
fier is specified, only that line is deleted. 


DEL 15 
DEL StartsLast 
DEL Sort» 32000 


DELAY 


See ASSIGN, OFF DELAY, ON DELAY, PRINTALL IS, and 
PRINTER IS. 


DELIM 
See TRANSFER. 


DELSUB 


This statement deletes one or more SUB (or CSUB) sub- 
programs or user-defined function subprograms from mem- 
ory. Comments are associated with the subprogram above 
them. 


DELSUB FNTrims 
DELSUB Process TO END 
DELSUB SreecialisSprecial3 


DET Requires MAT 


This function returns the determinant of a matrix. 


Last_det=DET 
PRINT BET(Matrix) 





DIGITIZE Requires GRAPHX 


This statements inputs the X and Y coordinates of a digitized 
point from the locator specified by GRAPHICS INPUT IS. 


DIGITIZE Kpos;YrossStatus$ 
IF Flag THEN DIGITIZE K+¥ 


DIM 


This statement dimensions and reserves memory for REAL 
numeric arrays, strings and string arrays. 


DIM String$liGd] +Name$(L2) [32] 

DIM Param(48:+8:8:2+2 92 

DIM Array(-128:127,16) 

DIM Buff$C€Si2)] BUFFER, Array(300) BUFFER 


DISABLE 


This statement disables all event-initiated branches currently 
defined, except ON END, ON ERROR, and ON TIMEOUT. 


DISABLE 


DISABLE INTR Requires 1O 


This statement disables interrupts from an interface by turn- 
ing off the interrupt-generating mechanism on the interface. 


DISABLE INTR 7 
DISABLE INTR Isc 


DISP 


This statement causes the display items to be sent to the 
display line on the CRT. See IMAGE for specifier descrip- 


tions. 


DISP Prompt$s; 

DISP TAB(S)>FirstsTAB(20) ;Second 
DISP 

DISP NameS;:IdsCode 

DISP USING Form3iItem(idsItem(2) 
DISP USING "“SZ,DD" iMoney 
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DIV 
This operator returns the integer portion of the quotient of 
the dividend and the divisor. 


Quotient=Dividend DIY Divisor 
PRINT "Hours ="4Minutes DIV 60 


DOT Requires MAT 
This function returns the inner (dot) product of two numeric 


vectors. 


RessDOT(VecisVec2) 
PRINT DOT(A;B) 


DRAW Requires GRAPH 
This statement draws a line from the pen’s current position 
to the specified X and Y coordinate position using the cur- 
rent line type and pen number. 


DRAW 10,90 
DRAW NextoxsNextoy 


DROUND 


This function rounds a numeric expression to the specified 
number of digits. If the specified number of digits is greater 
than 15, no rounding takes place. If the number of digits 
specified is less than 1, zero is returned. 


Testrreal=DROUND(True_real+i2) 
PRINT “Approx. Voitts ="sDROUND(Volts:3) 


DUMP 


This statement copies the contents of the alphanumeric dis- 
play to a printing device. With GRAPH, the statement copies 
the contents of the graphics display to a printing device. 


DUMP ALPHA 
DUMP SLPHA #701 
Requires GRAPH 


DUMP GRAPHICS #Device 
DUMP GRAPHICS Coloruwsource 
DUMP GRAPHICS 28 TO #702 
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DUMP DEVICE IS Requires GRAPH 


This statement specifies which device receives the data when 
either DUMP ALPHA or DUMP GRAPHICS is executed 
without a device selector. Specifying EXPANDED results in 
graphics dumps that are 2 x on each axis and rotated 90°. 
Device 701 is assumed unless a DUMP DEVICE IS state- 
ment is executed. 

DUMP DEVICE 18 721 

DUMP DEVICE 15 Printers EAPANDED 


DVAL 


This function converts a binary, octal, decimal, or hexade- 
cimal character representation into a REAL whole number. 


Number=DVAL(String$+Radix) 
PRINT DVAL("FFS900" 416) 


DVAL$ 


This function converts a numeric quantity into a character 
string representing a binary, octal, decimal, or hexadecimal 
base. 


String$=DVAL$ (Number sRadix) 
PRINT DVAL$(Count MOD 25652) 


E 


ECHO 
See SET ECHO. 


EDGE 


See IPLOT, PLOT, POLYGON, RECTANGLE, RPLOT, and 
SYMBOL. 
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EDIT 


This command allows you to enter a new program or edit a 
program already in memory. Refer to the BASIC Program- 


ming Techniques manual. With KBD, typing-aid keys can be 
edited. 


EDIT 
EDIT LabelZ 
EDLT 100075 


Requires KBD 
EOI? KEY 5 


ELSE 
See IF... THEN. 


ENABLE 


This statement re-enables all event-initiated branches which 
were suspended by DISABLE. 


ENABLE 


ENABLE INTR Requires IO 


This statement enables the specified interface to generate an 
interrupt which can cause event-initiated branches. 


ENABLE INTR 7 
ENABLE INTR IsciMask 


END 


This non-optional statement marks the end of the main 
program. Subprograms {if any) follow the END statement. 


END 


END IF 
See IF... THEN. 


END LOOP 
See LOOP. 
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END SELECT 
See SELECT...CASE. 


END WHILE 
See WHILE. 


ENTER 


This statement is used to input data from a specified source 
and assign the values entered to variables. See IMAGE for 
specifier descriptions. 

ENTER 7O5jNumber Strings 

ENTER DevicedxsYi2 

ENTER Command$sParameter 

ENTER @FileiArray(*) 

ENTER BRandom+Record USING 2OsText${Line) 

ENTER @Source USING FmtS3B(1)+B(2) +BC3) 

ENTER 12 USING “#,GA"SASED2563 


EOL 
See ASSIGN, PRINTALL IS, and PRINTER IS. 


EOR 
See OFF EOR, ON EOR, and TRANSFER. 


EQT 
See OFF EOT and ON EOT. 


ERRDS 


This function returns the device selector of the I/O resource 
involved in the most recent I/O error. 


IF ERRDS=701 THEN GOSUB Print _error 
IF ERRN=1G3 THEN Missing=ERRDS 
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ERRL 


This function returns a value of 1 if the most recent error 
occurred in the specified line. Otherwise, a value of 0 is re- 
turned. The specified line must be in same context as the 
ERRL function. 


IF ERRL (220) THEN Parsewerror 
IF NOT ERRL( Parameters) THEN Other 


ERRM$ 


This function returns the text of the error message associated 
with the most recent program execution error. 


PRINT ERRM$ 
Emt=ERRMS 
ENTER Em$i€rror_numsError_wline 


ERRN 


This function returns the number of the most recent program 
execution error. If no error has occurred, a value of 0 is re- 
turned. 


IF ERRN=80 THEN Disc_out 
DISP “Error Number = "JSERRN 


ERROR 
See OFF ERROR and ON ERROR. 


EXIT IF 
See LOOP. 


EXOR | 


This operator returns a 1 or a O based on the logical exdut 
sive OR of its arguments. 


Ok=Firsturpass EXOR Old_data 
IF & EXOR Flag THEN Exit 
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FOR...NEXT 


This construct defines a loop which is repeated until the loop 
counter passes a specified value. 


EXP 


This function raises e to the power of the argument. Internal- 
ly, Napierian e=2.718 281 828 459 05, 


{oo FOR [=4 TG 0 STEP -.1 
116 PRINT I3SOR(T) 
120 NEXT I 


YeEKP(-X°2/2) 
PRINT “e to the"GZi"="SEXP(Z) 


EXPANDED 
See DUMP DEVICE IS. 


1220 INTEGER Point 

1230 FOR Point=i TO LEN(A$) 

1240 CALL Convert (A${Points1]) 
1250 NEKT Point 


FORMAT 
See ASSIGN. 


FRACT 


This function returns the “‘fractional part’’ of its argument. 


F 


FILL 


See IPLOT, PLOT, POLYGON, RECTANGLE, RPLOT, and 
SYMBOL. 





FIND Requires PDEV For all X, X =INT(X) + FRACT(X). 
This program editing command allows searching for speci- PRINT FRACT(17/3) 
fied text. Right part=FRACT(Both_parts) 


FIND “SUB Printer” 
FIND "Costs" IN 1550 
FIND “Target” IN LabelisLabel2 


FN 


This keyword transfers program execution to the specified 
user-defined function and may pass items to the function. 
The value returned by the function is used in place of the 
function call when evaluating the statement containing the 
function call. See DEF FN. 

PRINT KiFNChange(a 

Final$=FNStrip$(First$) 


Parameter=FNProcess(References(VYalue) »@Path} 
R=FNTrans(Item(Start+O0ffset) sLookur(*)) 


FNEND 


The last statement of a function subprogram. Must never be 
executed; control actually transferred back to calling content 
by a RETURN <value> statement. 


FNEND 


FRAME Requires GRAPH 


This statement draws a frame around the current clipping 
area using the current pen number and line type. After draw- 
ing the frame, the current pen position coincides with the 
lower left corner of the frame, and the pen is down. 


FRAME 


FRENCH 
See LEXICAL ORDER IS. 
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GCLEAK Requires GRAPH 


This statement clears the graphics display or sends a com- 
mand to an external plotter to advance the paper. 


GCLEAR 


GERMAN 
See LEXICAL ORDER IS 


GESCAPE Requires GRAPHX 


This statement is used for communicating device-dependent 
graphics information. The type, size, and shape of the arrays 
must be appropriate for the requested operation. 


GESCAPE Device OrperationiReturn_array(*) 
GESCAPE 28:5 

CESCAPE 3:2;Color_maPi*) 

GESCAPE Ds:Qe Send_array(#)iReceivel*#) 


Operation 
Selector 


Summary of Request 

Number of color-map entries 

Color map values 

| Hard clip values 
Normal drawing mode 

| Alternate drawing mode 

| Return graphics masks 

| 





Set graphics masks 

Set tablet hard clip limits 

Get tablet hard clip limits 

Get hard clip limits for all tablets 


GET 


This statement reads the specified ASCII file and attempts to 
store the strings into memory as program lines. If specified, 
program lines are renumbered to the first line identifier and 
run at the second line identifier. Also see LOAD. 


GET "George" 
GET NameS&Msus$ New process 
CET Next progs f80710 
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GINIT Requires GRAPH 


This statement establishes a set of default values for system 
variables affecting graphics operations. 


GINIT 


GLOAD Requires GRAPH 


This statement loads the contents of an INTEGER array into 
the graphics frame buffer. Also see GSTORE. 


GLOAD Picture(*) 
IF Flag THEN GLOAD Array (*)} 
GLOAD 28,HeSBG2Z7(*) 


GOSUB 


This statement transfers program execution to the subroutine 
at the specified line. The specified line must be in the current 
context. The current program line is remembered in anti- 
cipation of returning {see RETURN). 


GOSUB 120 
IF Numbers THEN GOSUB Process 


GOTO 


This statement transfers program execution to the specified 
line. The specified line must be in the current context. 
GOTO 550 


GOTG Loorpustart 
IF Full THEN Exit 


GRAPHICS Requires GRAPH 


This statement turns the graphics display on or off. The 
statement has no effect on the contents of the graphics 
memory, it just controls whether it Is displayed or not. 


GRAPHICS ON 
IF Flag THEN GRAPHICS OFF 
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GRAPHICS INPUT IS Requires GRAPHX 


This statement defines the device to be used for subsequent 
DIGITIZE and READ LOCATOR statements. The default 
graphics input device is GRAPHICS INPUT IS KBDs"KBD", 


GRAPHICS INPUT IS KBD,°KBD" 
GRAPHICS INPUT IS KBD>"ARROW KEYS" 
GRAPHICS INPUT 15 706G+"HPGL” 
GRAPHICS INPUT [5 Ds +Hrs 

GRAPHICS INPUT IS KBD;" TABLET” 


GRID Requires GRAPH 
This statement draws a full grid pattern. The pen is left at the 
intersection of the X and Y axes. 


GRID 10,10 
GRID Xspace;sY¥srpacerXlocy+YlocxsXecounts 
Yeoount:+MaJsorusize 


GSTORE Requires GRAPH 


This statement stores the contents of the graphics frame buf- 
fer into an INTEGER array. See GLOAD. 


GSTORE Picture(#) 
IF Final THEN GSTORE A(+#) 
CSTORE 2B,HepSB627(*) 
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IDN 
See MAT. 


IDRAW Requires GRAPH 


This statement draws a line from the current pen position to 
a position calculated by adding the X and Y displacements to 
the current pen position. 


IDRAW K+5010 
IDRAW Delta_x:Delta_y 


IF... THEN 


This statement provides conditional branching. 


i560 IF Flag THEN Next_file 
{60 IF Pointeré<i THEN Pointer=l 


S80 IF First pass THEN 

590 Flag=0 

600 INPUT “Command?” -Cmd$ 

610 IF LEN(Cmd$) THEN GOSUB Parse 
620 END IF 


{000 IF K«<Q THEN 


Loia BEEP 

1020 DISP "Improper Argument” 
1030 ELSE 

1040 Root=SQR(K) 

1050 END IF 

IMAGE 


This statement provides image specifiers for the formatting 
of data which is entered or output with various statements. 
These specifiers can also be included after a USING clause 
in statements supporting that syntax. 


IMAGE 42,0D;34 5K +/ 
IMAGE "Result = "sSDDDEr3CKK 22 
IMAGE #,6 
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Effects of the image specifiers on an ENTER statement are 
shown in the following table. 


Specifier 


Meaning 


emer tanmnemrervertrssennnevennery ferret PABA AP En CCCET CTC A CL A A terre 


K 


oa 


| Freefield Entry. 


| Numeric: Entered characters are sent to number buil- 


der. Leading non-numeric characters are ignored. All 
blanks are ignored. Trailing non-numeric characters 
and characters sent with EOI true are delimiters. 
Numeric characters include digits, decimal point, +, 





—,e, and E, when their order is meaningful. 


String: Entered characters are placed in the string. A 
carriage-return not immediately followed by a line- 
feed is entered into the string. Entry to a string ter- 
minates on CR/LF, LF, a character received with EO! 
true, or when the dimensioned length of the string is 
reached. 








; 


'Like K except that LF is entered into a string, and 
thus CR/LF and LF do not terminate the entry. 





Like K, except that the European number format is 
used. Thus, comma is the radix indicator and period 
lis a numeric item terminator. (Requires IO.) 





Same as —K for strings; same as H for numbers. 
(Requires IO.) 





Same action as D. 





| Same action as D. 

| Demands a character. Non-numerics are accepted to 
fill the character count. Blanks are ignored; other 
non-numerics are delimiters. 


5 


Same action as D. 





Same action as D. (Requires 10.) 


j 
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R 


literal 


B 


W 





~ age | - 
Specifier Meaning 
' poame action as D. 


| Like D, R demands a character. When R is used in a 
| numeric image, the number builder uses the Euro- 


pean number format. See the H specifier. (Requires 
JO.) 





Same action as 4D. 


i oy ay 
'Same action as 3D. 


Same action as 4D. 


Same action as 5D. 


| Demands a string character. Any character received 
is placed in the string. 


Skips a character. 
| Skips one character for each character in the literal. 


Demands one byte. The byte becomes a numeric 
quantity. 


| Demands one word, which is interpreted as a 16-bit, 
| two’s-complement integer. The first byte entered on 
an 8-bit interface is the most-significant byte. The 
word is always entered in a single operation on a 
16-bit interface. Files, string variables, and buffers 
are treated as &-bit sources. Pad bytes are entered if 
| necessary to achieve word-boundary alignment. 


Like W, except that pad bytes are not entered. Does 
not override a BYTE attribute used with a 16-bit in- 
terface. (Requires !O.} 


| Statement is terminated when the last ENTER item is 
|terminated. EOI and line-feed are item terminators, 
and early termination is not allowed. 


Same as # except EOI is a statement terminator. 
Early termination is allowed if the current item is 
| satisfied. 
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Specifier 





@ 


i 





Meaning 


Specifies that an END indication is required with the 
last character of the last item to terminate the ENTER 
| statement. Line-feeds are not statement terminators. 
| {Requires 1O.} 


Specifies that a line-feed terminator is required as the 
last character of the last itern to terminate the ENTER 
statement. EOI is ignored, and other END indications 
cause an error. (Requires [O.)} 


Demands a new field; skips all characters to the next 
i line-feed. EOI is ignored. 


Ignored for ENTER. 
Ignored for ENTER. 





Effects of the image specifiers on a DISP, LABEL, OUTPUT, 
or PRINT statement are shown in the following table. 


Specifier 





Meaning 


Compact field. Outputs a number or string in stan- 
dard form with no leading or trailing blanks. 


Same as K. 


Similar to K, except the number is output using the 
European number format. (Requires IO.) 


Same as H. (Requires IO.) 
Outputs the number's sign {+ or —). 


/Outputs the number's sign if negative, a blank if 
positive. 


Outputs one digit character. A leading zero is re- 
placed by a blank. If the number is negative and no 
sign image is specified, the minus sign will occupy a 
leading digit position. If a sign is output, it will ‘float’ 


|to the left of the left-most digit. 


40 





























Specifier 
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Xx 
literal 


B 





Meaning 
| Same as D, except that leading zeros are output. 


Like D, except that asterisks are output instead of 
leading zeros. (Requires 10.) 


| Outputs a decimal point radix indicator. 

Outputs a comma radix indicator. (Requires IO.) 
, Same as ESZZ. 

Outputs an E, a sign, anda one-digit exponent. 


Outputs an E, a sign, anda two-digit exponent. 





Outputs an E, a sign, and a three-digit exponent. 


Outputs a string character. Trailing blanks are output 
if the number of characters specified is greater than 
the number available in the string. If the image speci- 
fier is exhausted before the string, the remaining 
characters are not sent. 


Outputs a blank. 
Outputs the characters contained in the literal. 


Outputs the character represented by one byte of 
data. This is similar to the CHR$ function. The num- 
ber is rounded to an INTEGER and the least- 


significant byte is sent. 


Outputs a 16-bit word as a two's-compiement inte- 
ger. On an 8-bit interface, the most-significant byte is 
sent first. The word is always sent in a single opera- 
tion on a 16-bit interface. Files, string variables, and 
buffers are treated as 8-bit destinations. Pad bytes 
are sent if necessary to achieve word-boundary 
alignment. 


Like W, except that pad bytes are not sent. Does not 
l override a BYTE attribute used with a 16-bit inter- 
| face. (Requires [O.) 
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Specifier | Meaning 
: # Suppresses automatic output of the EOL (End-Of- 
Line) sequence following the last output item. 
Jo Ignored in output images. 
+ i Changes the automatic EOL sequence to a single 


carriage-return. (Requires IO.) 


_ Changes the automatic EOL sequence to a single 
line-feed. (Requires IO.) 


Outputs a carriage-return and a line-feed. 


L Outputs the current EOL sequence. The default is 
CR/LF. With IO, the sequence may be redefined 
with ASSIGN or PRINTER IS. 


@ Outputs a form-feed. 





IMOVE Requires GRAPH 
This statement updates the logical pen position, by adding 
the X and Y displacements to the current logical pen posi- 
tion. 


IMQOVE K+50,0 
IMGVE Delta_x:Delta_y 


INDENT Requires PDEV 


This program editing command indents a program to reflect 
its structure and nesting. 


INDENT 
INDENT 824 


INITIALIZE 


This statement prepares mass storage media for use by the 
computer. When INITIALIZE is executed, any data on the 
media is lost. See MASS STORAGE IS. 


INITIALIZE ":INTERNAL" 

INITIALIZE ":HP9895,700+1" 
INITIALIZE Disc$rInterleave 
INITIALIZE ":MEMORY:01+2" ;Sectors 
INITIALIZE DisctrInterleave sFormat 
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INPUT 


This statement is used to assign keyboard input to program 
variables. Also see LINPUT. 


INPUT “Name?"sN$)"ID Number?" 1d 
INPUT "Enter 3 numbers" V(1) (2) 5009) 
INPUT "",String$Clisio] 

INPUT Array (#) 


INT 


This function returns the greatest integer which is less than 
or equal to the expression. The result will be of the same 
type (REAL or INTEGER) as the argument. For all X, 
X= INT(X) + FRACT(X). 


Whole=INT (Number) 
PRINT “Integer Portion =" sINTCX) 


INTEGER 


This staternent declares INTEGER variables, dimensions IN- 
TEGER arrays, and reserves memory for them. 


INTEGER ITsJeK 
INTEGER Array(-128:295:4) 
INTEGER Buf(2000) BUFFER 


INTENSITY 
See AREA and SET PEN. 


INTERACTIVE 


See RESUME INTERACTIVE and SUSPEND INTERAC- 
TIVE. 


INTR 
See OFF INTR and ON INTR. 


INV 
See MAT. 








IPLOT Requires GRAPH 


This statement moves the pen from the current pen position 
to a position calculated by adding the specified X and Y dis- 
placements to the current pen position. Plotting action is de- 
termined by the current line type and the optional pen con- 
trol parameter (see PLOT). 























ITPLOT 0:5 
IPLOT Delta_x:DeltauvsPen_control 






















IPLOT Array (#) 
IPLOT Shape(*#) FILL EDGE 


IVAL 




















cima! character representation into an INTEGER. 








NumberzIVAL(String$ Radix) 
PRINT IVAL("FES6" +168) 


IVAL$ 

















cimal, or hexadecimal string representation. 








String$=IVALS (Number Radix) 
PRINT IVAL$(Count MOD 25612) 











Requires GRAPHX 


This function converts a binary, octal, decimal, or hexade- 


This function converts an INTEGER into a binary, octal, de- 





K 
KBD 


This function returns 2, the device selector of the keyboard. 


STATUS KBDiKbd status 
OUTPUT KBOsClear¢: 


KBD$ 
This function returns the contents of the keyboard buffer. 
Also see ON KBD. 


PRINT KBDS3 
Bufferg=Buffert&KBDS 


KEY 


See EDIT, LIST, LOAD, OFF KEY, ON KEY, SCRATCH, 
and STORE. 


KNOB 
See OFF KNOB and ON KNOB. 


KNOBX 


This function returns the net number of horizontal knob 
pulses counted since the last time the KNOBX counter was 
zeroed. Invoking the KNOBX function zeros the counter af- 
ter itis read. Also see ON KNOB. 

Position=KNOBA 

IF KNOBK<O THEN Backwards 


KNOBY 

This function returns the net number of vertical knob pulses 
counted since the last time the KNOBY counter was zeroed. 
Invoking the KNOBY function zeros the counter after it is 
read. Also see ON KNOB. 


Position=KNOBY 
IF KNOBY<0O THEN Up 
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LABEL Requires GRAPH — 


This statement sends text to graphic devices. See IMAGE for 
specifier descriptions. 

LABEL Number,sString$ 

LABEL K(Offset)+KsAS£i 1805 

LABEL Arravit*) 


LABEL USING 1603K9¥o2 
LABEL USING "SZ.DD" iMoney 


LDIR Requires GRAPH 
This statement defines the angle at which labels are drawn. 
The angle is interpreted as counter-clockwise, from three 
o’clock. The current angle mode is used. 


LOTR 90 
LDIF ACS(Side) 


LEN 


This function returns the current number of characters in the 
argument. The length of the null string is O 


Last=LEN(String) 
IF NOT LEN(A$) THEN Empty 


LET 


This is the assignment statement, which is used to assign 
values to variables. The keyword “LET” is optional. 


LET Number=33 
Array(I+i)=Array(1)/2 
String$="Hello Scatt" 
AS(7FILLPZI=CHRSE(2Z7)8"2" 
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LEXICAL ORDER IS 


This statement defines the collating sequence for all string 
operations. 


Requires LEX 


LEXICAL ORDER IS ASCII 

LEXICAL ORDER IS STANDARD 
LEXICAL ORDER IS FRENCH 

LEXICAL ORDER IS GERMAN 

LEXICAL GRDER IS SPANISH 

LEXICAL ORDER IS SWEDISH 

LEXICAL ORDER IS My_lex.table(*) 


LGT 


This function returns the common logarithm (base 10) of its 
argument. 


Decibel=204#LOT( Volts) 
PRINT “Log of “$X3"%="5LGT(X 


LINE TYPE Requires GRAPH 


This statement selects a line type and repeat length for all 
subsequent lines. CRT line types are shown below, 


LINE TYPE 1 
LINE TYPE Style>-Rerpeat_len 


ee LINE TYPE 1@ ————__+ 


LINE TYPE 9 9 ———————~+4 
LINE TYPE § --—+--—--—- 
LINE TYPE Po eee. 
LINE TYPE 6 g tept eens Danie 
LINE TYPE Ss ice eee ee 

LINE TYPE 9 40 (cwccssteeseesseeeeeseeees 
LINE TYPE 3 

LINE TYPE 2 


LINE Ty Pe } 


47 





LOADSUB 


This statement loads BASIC subprograms from a file of type 
PROG into memory. See STORE. 


LOADSUB ALL FROM "George" 

LOADSUB ALL FROM NameS&iMsus$ 
LOADSUB Fred FROM Name$ 

LOADSUB FNConvert$ FROM "“STRFUNCTS" 


LINPUT 


This statement accepts alphanumeric input from the 
keyboard for assignment to a string variable. The LINPUT 
statement allows commas or quotation marks to be included 
in the value of the string, and leading or trailing blanks are 
not deleted. 


LINPUT "Next Command?" > Responset 
LINPUT Arrary$(1)}{£3] 


LIST 


This statement lists the program currently in memory to the 
selected device. Beginning and ending line labels or num- 
bers may be specified to list parts of the program. With KBD, 
the typing-aid definitions can be listed. LIST BIN lists the 


Requires PDEV 
LOADSUB FROM "My subs:HP9895,700;1" 


LOCAL Requires 1O 


This staternent returns all specified devices to their local 
state, 


name and version number of each BIN currently in memory, LOCAL @Dum 
along with a short description of the capabilities they pro- LOCAL 728 
3 LOCAL Isc 
vide. 
a on LOCAL LOCKOUT Requires IO 
#70 


This HP-IB statement sends the LLO {local lockout) mes- 
sage, which prevents local (front panel) control of devices in 


LIST #DeviceiLabeli+rLatel2 
EIST 2207250 


LIST BIN the remote state. 
. LOCAL LOCKOUT 7 
Requires KBD LOCAL LOCKOUT Isc 
nope tes LOCAL LOCKOUT @Heib 
See SEND. See READ LOCATOR and SET LOCATOR. 
LOAD LOCK Requires SRM 





This statement prevents other SRM workstation computers 
from accessing the remote file to which the I/O path is cur- 
rently assigned. Multiple LOCKs may be done on a file; the 
same number of unlocks must be done. If you do an 
ASSIGN @Path to *, the computer will do the appropriate 
number of UNLOCKs before closing the file. See also UN- 
LOCK. 


This statement loads programs, or binary programs into 
memory. With KBD the statement loads typing-aid defini- 
tions. Also see GET. 

LOAD Filenames 


LOAD "TEMP: INTERNAL + 4;i" +Runwline 
LOAD BIN “ERR"&Msuss 





| 
u 
| 
| 
| 
| 


Requires KBD LOCK @File CONDITIONAL Result 


IF A THEN LOCK @FilesCONDITIONAL Result 





LOAD KEY “AIDS” 
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LOG 


This function returns the natural logarithm (base e} of the 
argument. See LGT. 


Timesz-L#eRc#LOG(Volts/Emf) 
PRINT “Natural log of “$¥s"=s"$LOGCY) 


LOOP 


This construct defines a loop which is repeated until the ex- 
pression in an EXIT IF statement is evaluated as true (non- 
zero). There may be any number of EXIT IF statements, but 
they must be at the same nesting level as the LOOP state- 
ment. 


330 LOOP 

S60 Test=RND-.5 

S70 EXIT IF Test?.4 

280 CALL Simulate 

290 END LOOP 

LORG Requires GRAPH 


This statement specifies the relative origin of labels with re- 
spect to the current pen position. 


LORG New_lorg 
IF YsLimit THEN LORG 3 








6 


+ 


te 
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be 
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LWCS$ 


This function returns a string formed by replacing any upper- 
case characters with their corresponding lowercase char- 
acter, 


Lower€=LWCS(Mixed$) 
IF LWO@(Answerh)="+" THEN True test 


M 
MASS STORAGE IS 


This statement specifies the system mass storage device. It 
may be abbreviated as MSI when typed from the keyboard. 
Note that some device type specifiers work for more than 
one model of disc drive. 


MASS STORAGE IS ":INTERNAL” 


MASS STORAGE 15 "3,700.1" 
MASS STORAGE IS Msuss 








BIN Required Device Type 
none | INTERNAL 
MEMORY 
DISC & | HP9895 
HPIB or FHPIB) | HP9121 
| HP9133 
' HP9134 
HP9135 
| HP913X 
DISC & HPIB HP82901 
HP82902 
| HP8290X 
CS80 & CS80 (7908, 7911, 7912, 7914, 9122...) 
HPIB or FHPIB 
HP9885 & GPIO | HP9885 
SRM & DCOMM | REMOTE 
BUBBLE | BUBBLE 
EPROM | EPROM 


ot 


Se PAILS SILAN SA TEN RESIN ESI BRE vy ite i 
Se a en aa eis 


MAT Requires MAT ex. : 


This statement can be use to initialize string and numeric 
arrays, copy string and numeric arrays, and perform opera- 
tions on numeric arrays. 


MAT Array= Ae(Reft+1/3) 

MAT String$= (RPT$(" ",80)) 
MAT Clone= Parant 

MAT A= ArrarlizArrarye 

MAT Vectar= CSUM(Matrix) 

MAT Vector= RSUM(Matrix) 

MAT Transpositian= TRN(Matrix} 
MAT Identity= IBDN 

MAT Inverse= INWV(Matrix) 


MAT REORDER Requires MAT 


This statement reorders elements in an array according to 
the subscript list in a vector. 


MAT REGRDER Array BY Vector:Dimension 
MAT REORDER Linest BY New_order 


MAT SORT Requires MAT 


This statement sorts an array along one dimension according 
to lexical or numerical order. 


MAT SORT ArrayiTags+*) 

MAT SORT Vals (1+#1:3)-(25#5:5) DES 
MAT SORT Startivec TO Endivec 

MAT SORT Strings$(#-+2}01453] TO Order 


MAX Requires MAT 
This function returns a value equal to the greatest value in 
the list of arguments. Each element of an array is considered 
a separate value. 


Biggest=MAxCElements(#)} 
PRINT MAK CI temiysL7?>+Total/3) 
Result=MAX(FloarsMIN( Ceiling s+Argument)} 





























MAXREAL 


This function returns the largest positive REAL number 
available in the range of the machine. Its value is approx- 


imately 1.797 693 134 862 32E + 308. 
IF XesLGT(MAXREAL) THEN Y210°X 
Half_max=MAXREAL/2 


MIN Requires MAT 


This function returns a value equal to the least value in the 
list of arguments. Each element of an array is considered a 
separate value. 


Smallest=MIn¢(Elements(#)) 
PRINT MIN(Itemi+i7+Total/3) 


MINREAL 


This function returns the smallest positive KEAL number 
available in the range of the machine. Its value is approx- 


imately 2.225 073 858 507 24E-308. 


IF XFsLOG(MINREAL) THEN Y=EXKP(K) 


MOD 


This operator returns the remainder of a division (see also 


MODULO). 


Remainder=Dividend MOD Bivisor 
PRINT "Seconds ="iTime MOD GO 


MODULO 


This operator returns the remainder of a division just like 
MOD, only with one additional constraint—the result satisfies: 


0=(X MODULO Y)<Y if Y>O 
Y<(X MODULO Y)<0 if Y<O 


Remainder=Dividend MODULO Biviser 
PRINT "Seconds ="sTime MODULO 690 
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MOVE Requires GRAPH 
This statement updates the logical pen position. 

MOVE 10,75 

MOVE Next ix sNext_y 


MOVELINES Requires PDEV 


This program editing statement moves contiguous program 
lines from one location to another. If only one line identifier 
is specified, only that line is moved. See COPYLINES. 


MOVELINES 1200 TQ 3250 
MOVELINES 10,440 TO S40 
MOVELINES LabelisLabel? TO Latel3 


MSI 
See MASS STORAGE IS. 


MTA 
See SEND. 


NEXT 
See FOR...NEXT. 


NOT 


This operator returns 1 if its argument equals 0. Otherwise, 0 
is returned, 


Invert -flag=NOT Std _device 
IF NOT My_sot THEN Sleep 


NPAR 


This function returns the number of parameters passed to 
the current subprogram. 


IF NPAR =3 THEN Extra 
Factors=NPAR-?2? 
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NUM 


This function returns the decimal value of the ASCII code of 
the first character in the argument. The range of returned 
values is O thru 255. 


Asciiuval=NUM(String$) 
ASC IT3L ]=CHRSCNUM(ASLTIJ) +32) 


O 
OFF CYCLE Requires CLOCK 


This statement cancels event-initiated branches previously 
defined and enabled by an ON CYCLE statement. 


OFF CYELE 
IF Kickustand THEN OFF CYCLE 


OFF DELAY Reguires CLOCK 


This statement cancels event-initiated branches previously 
defined and enabled by an ON DELAY statement. 


OFF DELAY 
IF Done THEN OFF DELAY 


OFF END 


This statement cancels event-initiated branches previously 
defined and enabled by an ON END statement. Subsequent 
EOR and EOF conditions generate an error, 


OFF END @File 
IF Special! THEN OFF END 8Source 


OFF EOR Requires TRANS 


This statement cancels event-initiated branches previously 
defined and enabled by an ON EOK statement. 


OFF EDR @Device 
OFF EOR @File 
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OFF EOT Requires TRANS 


This statement cancels event-initiated branches previously 
defined and enabled by an ON EOT statement. 


OFF EUT @Device 
OFF E0T @File 


OFF ERROR 


This statement cancels event-initiated branches previously 
defined and enabled by an ON ERROR statement, Subse- 
quent errors are reported to the user in the usual fashion. 


OFF ERROR 


OFF INTR Requires IO 


This statement cancels event-initiated branches previously 
defined by an ON INTR statement. 


OFF INTR 
OFF INTR 12 
OFF INTR Hpib 


OFF KBD 


This statement cancels event-initiated branches previously 
defined and enabled by an ON KBD statement. Subsequent 
keypresses are sent to the operating system in the normal 
manner. 


OFF KBO 


OFF KEY 


This statement cancels event-initiated branches previously 
defined and enabled by an ON KEY statement. Without 
KBD, subsequent softkey presses cause beeps. With the 
KBD BIN, the action of subsequent softkey presses depends 
upon the typing-aid definitions. 

OFF KEY 

IF C_sharep AND NOT B_flat THEN OFF KEY 

OFF KEY Current key 
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OFF KNOB 


This statement cancels event-initiated branches previously 
defined and enabled by the ON KNOB statement. Subse- 
quent use of the knob results in normal scrolling or cursor 


movement. 


OFF KNOB 


OFF SIGNAL Requires 1O 


This statement cancels event-initiated branches previously 
defined and enabled by an ON SIGNAL statement. 


OFF SIGNAL 
DFF SIGNAL Sig unumber 


OFF TIME Requires CLOCK 


This statement cancels event-initiated branches previously 
defined and enabled by an ON TIME statement. 


OFF TIME 


OFF TIMEOUT 


This statement cancels event-initiated branches previously 
defined and enabled by an ON TIMEOUT statement. 


OFF: 1 IMEGUT 
GFF TINEGUT dé 
OFF TIMEOUT Heib 


ON 


This statement transfers program execution to one of several 
destinations selected by the value of the pointer. 


ON Xi GOTO 100,150,170 
IF Point THEN ON Point GOSUB Firsts 
Second;sFhird:lLast 


ASSN RRMA IASI MERA EERS t 








‘ON EOT 


ON CYCLE Requires CLOCK 


This statement defines and enables an event-initiated branch 
to be taken each time the specified number of seconds has 
elapsed. 

ON CYCLE Seconds +Priority CALL Sub_name 


ON CYCLE Max_time RECOVER Backup 
ON CYCLE 3600.3 GOTO 1206 


ON DELAY Requires CLOCK 


This statement defines and enables an event-initiated branch 
to be taken after the specified number of seconds has 
elapsed. 


ON DELAY SecondssPriority CALL Sub_name 
ON DELAY 3 COTG 5710 
ON DELAY Max_time,d GOSUB No_operator 


ON END 


This statement defines and enables an event-initiated branch 
to be taken when end-of-file is reached on the mass storage 
file associated with the specified 1/O path. 

ON END @Source COTO 500 


ON END @®File RECOVER Next_file 
ON END @Path CALL Subuname 


ON EOR Requires TRANS 


This statement defines and enables an event-initiated branch 
to be taken when a end-of-record is encountered during a 


TRANSFER. 


ON EQOR @Path+Priority CALL Sub_name 
ON EQR BDevice GOTO 15006 
ON EGR @File,s2 GOSUB Labell 


Requires TRANS 


This statement defines and enables an event-initiated branch 
to be taken when the last byte is transferred by a TRANS- 
FER statement. 


DN EOT @Path»Priority CALL Sub_name 
ON EOT @Device GOTO 1500 
ON EOT @File>s2 GOSUB Labell 
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ON ERROR 


This statement defines and enables an event-initiated branch 
which results from a trappable error. This allows you to write 
your own error-handling routines. 

ON ERROR GOTO 1206 


ON ERROR RECOVER Crash 
ON ERROR CALL Report 


ON INTR 


This statement defines an event-initiated branch to be taken 
when an interface card generates an interrupt. The interrupts 
must be explicitly enabled with an ENABLE INTR statement. 


Requires IO 


ON INTR 7 GOTO S00 
GON INTR Heibsd GOSUB Service 
ON INTR IscePriority CALL Sub_name 


ON KBD 


This statement defines and enables an event-initiated branch 
to be taken when a key is pressed. See KBDS. 


GN KBD GOTO 156 

ON KBD Priority GOSUB Labell 
ON KBD ALL RECOVER 880 

ON KBD ALL»2 CALL Sub_name 


ON KEY 


This statement defines and enables an event-initiated branch 
to be taken when a softkey is pressed. 

ON KEY © GOTO 150 

ON KEY Number,Priority GOSUB Labell 


ON KEY 10 LABEL AS RECOVER 770 
ON KEY 5S LABEL "“Print":@3 CALL Report 


ON KNOB 

This statement defines and enables an event-initiated branch 
to be taken when the knob is turned. See KNOBX and 
KNOBY. 

ON KNOB .! GOTO 250 


ON KNOB Seconds+Priority CALL Sub_name 
ON KNOB 1/2;4 GOSUB Labell 
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ON SIGNAL Requires [O 


This statement defines and enables an event-initiated branch 
to be taken when a SIGNAL statement is executed using the 
same signal selector. 


ON SIGNAL Selector:Priority CALL Sub_name 
ON SIGNAL RECGVER Trap 
ON SIGNAL 8 GOTO 770 


ON TIME Requires CLOCK 


This statement defines and enables an event-initiated branch 
to be taken when the clock reaches a specified time. 


ON TIME Seconds ;Priority CALL Sublname 
ON TIME TIMEDATE+3600 GOTG td4o 
ON TIME Alarms15 GOSUB Label3 


ON TIMEOUT 


This statement defines and enables an event-initiated branch 
to be taken when an I/O timeout occurs on the specified 
interface. 


ON TIMEOUT 7,4 GOTO 770 
ON TIMEOUT IscsSeconds CALL Sublname 
ON TIMEOUT 12,+1/2 RECOVER Label 


OPTION BASE 


This statement specifies the default lower bound of arrays. 
Zero is the assumed lower bound unless an OPTION BASE 
statement is executed. 


OPTION BASE 6 
OPTION BASE 1} 


OPTIONAL 
See DEF FN and SUB. 


OR 


This operator returns a 1 or a QO based on the logical inclu- 
sive OR of the arguments. 


X2¥ OR Z 
IF File_type OR Device THEN Process 
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OUTPUT 


This statement outputs items to a specified destination. See 
IMAGE for specifier descriptions. 


OUTPUT 7OLiNumbersString$s 

OUTPUT @FilesArray(#)},END 

OUTPUT @Random+Record USING Fatililtem(S) 
OUTPUT {2 USING "#;6A"3BS0256) 

DUTPUT Dest USING 1103A/1000 ,VALS(Res) 
OUTPUT @PrintersRankildsNames 


P 


PARITY 
See ASSIGN, 


PASS CONTROL Requires IO 


This statement passes Active Controller capability to a speci- 
fied HP-IB device. 


PASS CONTROL 719 
PASS CONTROL Device 


PAUSE 


This statement suspends program execution. See CONT. 


PAUSE 


PDIR Requires GRAPH 


This statement specifies the angle at which the output from 
IPLOT, RPLOT, POLYGON, POLYLINE, and RECTANG- 
LE is produced. 


PDIR 30 
IF Done THEN PDIR Old_angle 
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PEN Requires GRAPH 


This statement selects a pen on the current plotting device. 


PEN -1i 
PEN Select 


For monochrome CRTs: 


PEN>O draws 
PEN = 0 complements 
PEN<O erases 


For Mode! 36C with GRAPHX, the default color-mapped 
pen colors are: 





PEN | Color 
0 Black 8 Black 
] White 9 Olive Green 
2 j Red 10 Aqua 
a Yellow a7 Royal Blue 
4 Green 12 Maroon 
5 Cyan 13 Brick Red 
6 | Blue 14 Orange 
7 Magenta fa Brown 


For non-color-mapped mode, only pens —7 thru +7 are 
used, and PEN 0 complements. 


PENUP Requires GRAPH 


This statement lifts the pen on the current plotting device. 


PENUP 
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PI 
This function returns 3.141 592 653 589 79, which is an 
approximate value for 7. 


Area=Pl*Radius "2 
PRINT Xa kX#24P] 


PIVOT Requires GRAPH 


This statement specifies a rotation of coordinates which is 
applied to all drawn lines, but not to labels or axes. The 
current angle mode is used. 


PIVOT 30 
IF Special THEN PIVOT Radians 


PLOT Requires GRAPH 


This statement moves the pen from the current pen position 
to the specified X and Y coordinates. Plotting action is deter- 
mined by the current line type and the optional pen control 
parameter, 


PLOT 20,90 
PLOT Next_x:Next_ysPen_control 


Pen Control Pen Action 







Up before move 
Down before move 


Negative Even 
Negative Odd 


Positive Even | Up after move 
Positive Odd | Down after move 
Default Down after move 


Requires GRAPHX 


PLOT Array (#) 
PLOT Shape(*),FILL+EDGE 
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The plotting array must be 2-column or 3-column. 2-column 
arrays contain X and Y coordinates and assume a pen con- 
trol of +1. The interpretation of a 3-column array is shown 
in the following table. 








Col1 | Col2 | Col3 | Meaning 
X | Y | <2 [Like —lor -2 
X | bg i —2 'Pen up before move 
x | y. cal Pen down before move 
x | Y | 0. ‘Pen up after move 
x | yy | 1 Pen down after move 
xX ¥ » 2 |Pen up after move 
Pen# | = 3. iSelect pen 
Line Type | Repeat | 4 (Select line type 
Color | ~ | 5 iColor value for FILL 
~ | = | 6  |Start polygon with FILL 
- | = 7 (End polygon 
— ~ | 8  jEnd of array data 
~ ~ | 9 No-op 
_ ~ | 10 [Start polygon with EDGE 
= ~ | 11 {Start polygon w/ FILL & EDGE 
~ - 12. |FRAME 
Pen # _ 13 jArea pen select 
Red Green 14 |Color value for FILL 
Blue 7 15 |Color value for FILL 
~~ — >15 [Ignored 
PLOTTER IS Requires GRAPH 


This statement selects a plotting device. Device 
3,"INTERNAL” (the CRT) is assumed unless a PLOTTER IS 
statement is executed. 


PLOTTER IS Device slds 

PEOTTER TS 703+" HPGL’ 

PLOTTER 1S 28;"98627A;sUS TV" 

PLOTTER 18 Ds»"98627ASEURO STD" 

PLOTTER IS CRT+"INTERNAL" COLOR MAP 
PLOTTER IS "MyBDATfile: INTERNAL" »"HPGL" 
PLOTTER IS "“file™s"HPGL” +PixsP2xsPly sP2y 
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These are the valid plotter specifiers when dealing with an 


HP98627A card: 





Desired | Plotter 
Display Format | Specifier 
Standard Graphics 

512 by 390 pixels, i "986278" or 


60 Hz, non-interlaced i "9B8G27AiUS STD" 
512 by 390 pixels, | "98627ASEURO STD" 
50 Hz, non-interlaced | 


High-Resolution Graphics 
512 by 512 pixels, 


"Q8G27A;iHI RES" 
46.5 Hz, non-interlaced 





TV Compatible Graphics 
512 by 474 pixels, “96627A1US Ty" 
60 Hz, interlaced 
(30 Hz refresh rate) 


912 by 512 pixels, 
50 Hz, interlaced 
(25 Hz refresh rate) 


POLYGON Requires GRAPHX 


This statement draws all or part of a closed regular polygon. 


"9S8627AEURO TY" 





POLYGON Radiuss+Totalisides ;Drawnesides 
POLYGON -Size,S+FILL+- EDGE 


POLYLINE Requires GRAPHX 


This statement draws all or part of an open regular polygon. 


POLYLINE Radius;Total_sides;Drawn_sides 
POLYLINE -Size;5 


POS 


This function returns the first position of a substring within a 
string. 


Point=POS(Big$sLittle$) 
IF POSCAS>;CHR$(10)) THEN Line lend 
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PPOLL Requires IO 


This function conducts a Parallel Poll and returns a byte rep- 
resenting eight status-bit messages of the devices on an HP. 
IB, 


Stat=PPOLL(7} 
IF BIT(PPOLL(@HPib)»3) THEN Reseond 


PPOLL CONFIGURE Requires [O 


This statement programs the logical sense and data bus line 
on which a specified device responds to a parallel poll. Re- 
sponse line is specified by bits O thru 2 and logic sense is 
specified by bit 3. 


PPOLL CONFIGURE 7il:2 
PPOLL CONFIGURE @DumiRasponse 


PPOLL RESPONSE Requires IO 


This statement defines the computer's response to a Parallel 
Poll on an HP-IB interface. 


PPOLL RESPONSE IsciService 
PPOLL RESPONSE @Hpitii 


PPOLL UNCONFIGURE Requires IO 


This statement disables the parallel poll response of a speci- 
fied device or devices. 


PPOLL UNCONFIGURE 7 
PPOLL UNCONFIGURE Device 
PPOLL UNCONFIGURE @Plotter 


PRINT 


This statement sends items to the PRINTER IS device. See 
IMAGE for specifier descriptions. 


PRINT "LINE" sNumber: 

PRINT Array (#)>5 

PRINT TABXY(1i+1) sHead$S +TABXY(Col+3) Msg 
PRINT String$Cir8]+TABlCi 2) sResult 

PRINT USING 125 5X +¥od 

PRINT USING "52,DD" iMoney 

PRINT USING FmtSildsIltem$ sKilograms/2.2 


AB 











PRINTALL IS 


This statement assigns a logging device for recording oper- 
ator interaction and troubleshooting messages. The PRIN- 
TALL device is 1 (the CRT} at power-on and after 
SCRATCH A. 


PRINTALL IS 761 
PRINTALL IS Gpio 
Requires lO 


PRINTALL IS 7O07s5E0L Mr$ DELAY 19 
PRINTALL IS DeviceiWIDTH 120,E0L My END 


PRINTER IS 


This statement specifies the system printing device for all 
PRINT, CAT and LIST statements which do not specify a 
destination. The PRINTER IS device is 1 (the CRT) at pow- 
er-on and after SCRATCH A. 


PRINTER IS 701 
PRINTER IS Gpio 
PRINTER IS “MyBDATfile” 
Requires IO 


PRINTER IS 7073E0L My DELAY 4.5 
PRINTER IS DevicesWIDTH 120,EQL Mv$ END 


PRINT LABEL Requires MS 


This statement gives a name to a mass storage volume. 


PRINT LABEL "MyVol" 
PRINT LABEL Volumeiname$S TO Msus# 


PRIORITY 
See SYSTEM PRIORITY. 
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PROTECT 


This statement specifies the protect code for non-SRM files. 
Only PROG, BDAT, and BIN files can be protected wih this 


form of the statement. 


PROTECT Named sPod 
PROTECT "“Georgecixytr INTERNAL: Gs1"°,°NEW" 


Requires SRM 


The following form of the PROTECT statement is valid only 
for SRM files, and any type of file can be protected, 


PROTECT "Filexald>"+(€"Mgor": MANAGER) + 
( "rw" sREAD WRITE) + ( "Read": READ?) 
PROTEC? “Fa tetas at? ata’ sOehe Te) 


PROUND 


This function returns the value of the argument rounded toa 
specified power of ten. 


Money=PROUND(Results-2) 
PRINT PROUND (Quantity +sDecimaliplace} 


PRT 


This function returns 701, the factory-set device selector for 
an external printer. 


PRINTER IS PRT 
OUTPUT PRTiTexts 


PURGE 


This statement deletes a file entry from the directory of a 
mass storage media. 


PURGE NametiMsus 
PURGE "TEMP: INTERNAL »4,1" 
PURGE "“George<PC>" 


FQ 

















R 
RAD 


This statement selects radians as the unit of measure for ex- 
pressing angles. See DEG. 


RAD 


RANDOMIZE 


This statement selects a seed for the RND function. 


RANDOMIZE 
RANDOMIZE Old_seed*Pl 


RANK Requires MAT 


This function returns the number of dimensions in an array. 


Dimensions=RANK (Array $) 
IF RANK(A)=2 THEN PRINT "A is a matrix” 


RATIO Requires GRAPH 


This function returns the ratio of the X hard-clip limits to the 
Y hard-clip limits for the current PLOTTER IS device. 


WINDOW OO, 10*RATIO»-10+10 
¥ gdu_maxzLOO*MAX(1,RATIO) 
Yo ddu maxsLOO*MAX(L,1/RATIO) 


READ 


This statement reads values from DATA statements and 
assigns them to variables. 


READ Number String 

READ Array (*) 

READ Field#{5+15] 

READ Item(irl) sItem( Zrii) +Item( ark) 


READIO 


This function reads the contents of the specified hardware 
register on the specified interface. 


Upper_byte=READIO(Gri0+4) 
PRINT “Register"’s1l$"="sREADIO(7 +1) 
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READ LABEL Requires MS 


This statement reads a volume label into a string variable. 


READ LABEL Volume_namet 
READ LABEL Vol_name$S FROM Msus# 


READ LOCATOR Requires GRAPHX 


This statement samples the locator device without waiting for 
a digitize operation. See GRAPHICS INPUT IS. 


READ LOCATOR X_pos+¥_pros 
READ LOCATOR Ki+Y¥sStatus¢ 


REAL 


This statement reserves storage for floating point variables 
and arrays. 


REAL Xs¥o2 
REAL Array(-128:127,15) 
RESBL Buf{t00) BUFFER 


RECORDS 
See TRANSFER. 


RECOVER 


A secondary keyword which causes control to return to the 
specified line when an event occurs. Multiple contexts may 
be skipped coming back to the specified line. This keyword 
works with all ON...<event> interrupts. See the BASIC 
Language Reference under the appropriate ON... heading 
for further information. 


ON KBD RECOVER 1200 
ON ERROR RECOVER Fix cerror 


RECTANGLE 


This statement draws a rectangle. 


Requires GRAPHX 


RECTANGLE Width+sHeight 
RECTANGLE 4+-8-FILL+EDGE 
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REDIM Requires MAT 
This statement changes the subscript range of previously 
dimensioned arrays. 


REDIM Array (New lower:New_upPer) 
REDIM String#(A+B+C) 


REM 


This statement allows comments in a program. 


{OO REM Program Title 


190 3! 
200 Info=0 ! Clear flag byte 
REMOTE Requires IO 


This statement places HP-IB devices having remote/local 
capabilities into the remote state. 
REMOTE 712 


REMOTE Device 
REMOTE BHpib 


REN 


This command renumbers the lines in a program. The de- 
fault for both parameters is 10. 


REN 1000 
REN 10032 
REN 26151 IN 260,Label2 


RENAME 


This statement changes a file’s name in a mass storage 
media’s directory. 


RENAME “TEMP<ece"” TO "FINAL" 
RENAME "OLD:INTERNAL» 4:1" TO "NEK” 
RENAME NameG&Msuss TO Temps 


REORDER 
See MAT REORDER. 









REPEAT...ONTIL 


This construct defines a loop which is repeated until the ex- 
pression in the UNTIL statement is evaluated as true (non- 
zero), . 


770 REPEAT 

7B0 CALL Process({Param) 

790 Param=ParameScaling 

B00 UNTIL ParamneMaximum 

REQUEST | Requires 1O 


This statement is used to send a Service Request (SRQ) on 
an HP-IB when the computer is non-active controller. To 
request service, the response must have bit 6 set. 


REQUEST IsciResrponse 
REQUEST @HreibsBit_6+Bit_o 


RE-SAVE 


This statement creates an ASCII file and copies program 
lines as strings into that file. If the specified file already ex- 
ists, the old entry is purged after the new file is successfully 
saved. 


RE-SAVE File@ ,First line rLastoline 
RE-SAVE “George” 

RE-SAVE "TEMP:INTERNAL :4 si" Labell 
RE-SAVE NamesaMsus$risSort 


RES 


This function returns the result of the last numeric calcula- 
tion which was executed from the keyboard. 


Result=RES 
IF Lasturesult<>RES THEN PRINT RES 


RESET Requires IO 


This statement resets an interface or the pointers of either a 
mass storage file or a buffer. 


RESET 20 
RESET Hreib 
RESET @Buffer 











RESTORE 
RESTORE specifies which DATA statement will be used by 
the next READ operation. 


RESTORE 
RESTORE Thirdoarray 


RE-STORE 


This statement creates a file and stores either an internal 
form of the BASIC program or typing-aid key definitions. If 
the specified file already exists, the old entry is purged after 
the new file is successfully stored. 


RE~STGRE Namet&aMsust 
RE-STGRE “TEMP:INTERNAL» 4:1" 


Requires KBD 


RE-STORE KEY “AIDS” 


RESUME INTERACTIVE 


This statement restores the normal functions of any program 
control keys previously deactivated by SUSPEND IN- 
TERACTIVE. 


RESUME INTERACTIVE 


RETURN 


This statement returns program execution to the line follow- 
ing the invoking GOSUB. The keyword RETURN is also 
used in user-defined functions (see DEF FN). 


To return from a GOSUB subroutine: 


RETURN 


To return a value from a user-defined function: 


RETURN Value 

RETURN 13774 

RETURN SIN(X)-4#EXP(SINCPI/Q)) 
RETURN File$&Msus$ 
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REV$ 


This function returns a string formed by reversing the sequ- 
ence of characters in the argument. 


Reverse$=REV$ (Forwards) 
Lastublank=LEN(A$)-POS(REYUS( AG), 8) 


RND 


This function returns a pseudo-random number greater than 
O and less than 1. 


Percent=RND#1i00 
TF RNO<,.5 THEN Case! 


ROTATE 


This function returns an integer which equals the value 
obtained by shifting the 16-bit binary representation of the 
argument the number of bit positions specified. The shift is 
performed with wraparound. Also see SHIFT. 


New word=ROTATE(Qlduword:2) 
Q=ROTATE(Q;Places) 


RPLOT Requires GRAPH 


This statement moves the pen from the current pen position 
to the specified relative X and Y position. The relative origin 
is set by line drawing statements other than RPLOT. The 
plotting action is determined by the current line type and the 
optional pen contro! parameter {see PLOT). 


RPLOT 10,12 
RPLOT Rel_x Rel_y»Pen_control 


Requires GRAPHX 


RPLOT Array (*) 
RPLOT Shape(*);>;FILL EDGE 
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RPT$ 


This function returns a string formed by repeating the argu- 
ment a specified number of times. 


PRINT RPTS("#" 580) 
Centerg=<RPT$(" ",(Right-Left-Length)/2) 


RSUM 
See MAT. 


RUN 


This command starts program execution at the specified line. 
If no parameter is specified, the program starts at the begin- 
ning, 

RUN 


RUN 10 
RUN Part? 


S 
SAVE 


This statement creates an ASCII file and copies program 
lines as strings into that file. 

SAVE File$sFirst_linerLast line 

SAVE “WHALES” 


SAVE "TEMP: INTERNAL 4:1" rLabell 
SAVE NameS&Msus$slsSort 


SC 


This function returns the interface select code associated 
with an I/O path name. 


Interface=SC(@Device) 
Drive rtisc=SC(@File) 


io 


SCRATCH 


This command erases all or selected portions of memory. 


SCRATCH clears the BASIC program from memory. All vari- 
ables not in COM are also cleared. 


SCRATCH C clears all variables, including those in COM. The 
program is left intact. 


SCRATCH A clears the BASIC program memory, all typing- 
aid key definitions, and all variables, including those in 
COM. Most internal parameters in the computer are reset to 
power-on values by this command. 


SCRATCH BIN does what a SCRATCH A does, plus it deletes 
all BINs except the CRT driver for the CRT in use. 


Requires KBD 
SCRATCH KEY 
SCRATCH KEY 2 


This clears the typing-aid definition of all softkeys or the 
selected softkey. 


SEC 
See SEND. 


SECURE Requires PDEV 


This command protects programs lines so they cannot be 
listed. 


SECURE 
SECURE CheckUpassword 
SECURE Routinel;sRoutine?2 
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SELECT...CASE 


This construct provides conditional execution of one prog- 
ram segment chosen from several. 


600 SELECT String$ 


510 CASE "Oo" TO "9" 

620 GOSUB Digits 

630 CASE "5" 

640 GOSUB Delimiter 

650 CASE <CHR$(32) ,°CHRS$(126) 

660 GOSUB Controlienr 

670 CASE £.9e 

680 GOSUB ignore 

690 END SELECT 

SEND Requires lO 


This statement sends messages to an HP-IB. 


SEND 73UNL MTA LISTEN 1 DATA "HELLO" END 
SEND @HeibsUNL MLA TALK Prime CMD 24+128 


CMD The following expressions are sent as bytes with 
ATN true. 

DATA The following expressions are sent as bytes with 
ATN false. If END is added, EOI is set on the last 
byte. 


LISTEN Following expression(s) sent as listen address 


(ATN true}. 
MLA Sends my listen address (ATN true). 
MTA Sends my talk address (ATN true). 
SEC Following expression(s) sent as secondary 


address (ATN true). 


TALK Following expression sent as talk address (ATN 
true). 
UNL Sends unlisten command (ATN true). 
UNT Sends untalk command (ATN true}. 
TE 











SET ECHO Requires GRAPHX 


This statement sets an echo to the specified location on the 
current PLOTTER IS device. 


SET ECHO Klocation+Y location 
SET ECHO 1000,7200 


SET LO CATOR Requires GRAPHX 


This statement specifies a new position for the locator on the 
current graphics input device. 


SET LOCATOR 12,95 
SET LOCATOR Old_x,Old_y 


SET P EN Requires GRAPHX 


This statement defines the color of one or more entries in 
the color map. Any pixels already drawn with the specified 
pen are changed to the new color. The following table shows 
HSL values for the default color map entries. 


SET PEN P_num COLOR Hue rSaturatesLuminous 
SET PEN Selector INTENSITY Red Blue sGreen 
SET PEN Start_pen COLOR Hsl_array(#) 

SET PEN 2 INTENSITY 4/1551/15,97135 




















Pen Color | Hue | Sat. Lum. 
0 Black 0 0 0 
i. White QO O ] 
Z Red 0 1 l 
2 Yellow ay 1 ] 
4 Green Pt: ] 1 
5 Cyan 50 1 ] 
6 Blue | by 1 i 
7 Magenta | 283 q 1 
8 Black 0 O | 0 
9 | Olive Green AS 2 .80 
10 Aqua » 4400 75 68 
11 | Royal Blue 75 36 | 64 
4 Maroon 95 65 78 
13 Brick Red 04 80 1 
14 Orange | .08 ] 1 
15 Brown .08 70 85 
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SET TIME 


This statement resets the time-of-day given by the real-time 


clock. 


SET TIME © 
SET TIME Hours*3600+Minutes#60 
SET TIMEDATE 


This statement resets the absolute seconds (time and day) 
given by the real-time clock. 


SET TIMEDATE TIMEDATE+86400 
SET TIMEDATE Strange_number 


SGN 
This function returns 1 if the argument is positive, O if it 


equals zero, and — |] if it is negative. 


Root=SGN(X)*SOR(ABS(X)) 
2=Z2*PT#SGN(Y) 


SHIFT 


This function returns an integer which equals the value’ 
obtained by shifting the 16-bit binary representation of the 
argument the number of bit positions specified, without wra- 
paround, Also see ROTATE. 


New _word=SHIFT(Olduwords-2) 
Mask=SHIFT(1sPositian) 


SHOW Requires GRAPH 


This statement is used to define an isotropic current unit-of- 
measure for graphics operations. 


SHOW -555,0,100 
SHOW Lefts Right »+BottomsTop 


SIGNAL Requires 1O 


This statement generates a software interrupt. See ON 
SIGNAL. 


SIGNAL Selector 
SIGNAL 3 
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SIN 


This function returns the sine of the angle represented by the 
argument. 


Sine=SIN( Angle) 
PRINT “Sine of "sThetai"="sSIN( Theta? 


SIZE Requires MAT 


This function returns the number of elements in a dimension 
of an array. 


Totalu.words=SIZE (Words 1) 
Ueppertound(2)=BASE( AL, 2)+S12E(AL:2)-1 
See MAT SORT. 


SPANISH 
See LEXICAL ORDER IS. 


SPOLL Requires IO 


This function returns an integer containing the serial poll re- 
sponse from the addressed device. 


Stat=SPOLL(707) 
IF SPOLL(@Device) THEN Respond 


SQR 
This function returns the square root of the argument. 


Ames=SOR(Watts/Ohms) 
PRINT “Square root of "$KE"="SS5OR(K 


STANDARD 
See LEXICAL ORDER IS. 


STATUS 


This statement returns the contents of I/O path or interface 
Status registers. 

STATUS Likpos:Yeros 

STATUS IsciRegistersValirsVal2.Yal3 

STATUS 1,+93Screenwidth 

STATUS @FilesSikRecard 
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STEP 
See FOR...NEXT. 


STOP 


This statement terminates execution of the program. 


STOP 
IF Done THEN STOP 


STORE 


This statement creates a file and stores either an internal 
form of the BASIC program or typing-aid definitions into the 
file. 


STORE NamefiMsuss 
STORE "“TEMP:INTERNAL +411" 


Requires KBD 


STORE KEY "AIDS" 


STORE SYSTEM 


This statement stores the entire BASIC operating system cur- 
rently in memory including any BINs that are loaded. 


STORE SYSTEM “SYSTEM_B1i: INTERNAL” 
STORE SYSTEM "BACKUP" 


SUB 


This is the first statement in a SUB subprogram and specifies 
the subprogram’s formal parameters. SUB subprograms 
must follow the main program’s END statement and must be 
terminated by a SUBEND statement. See CALL. 


SUB Parse(String?) 

SUB Process 

SUB Transform(@Printer;+INTEGER Array(*#)>s 
OPTIONAL Texts) 

SUB Extract(Buff% BUFFER; Pointer} 
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SUBEND 


The last statement of a SUB subprogram. This returns con- 
trol to the calling context. See also SUB. 


SUBEND 


SUBEXIT 


This statement may be used to return from a SUB subprog- 
ram at some point other than the SUBEND statement. 


SUBEAKIT 
IF Done THEN SUBEXIT 


SUM Requires MAT 


This function returns the sum of all the elements in a numer- 
ic array. 


Total=SUM(Array) 
PRINT SUM(Sauares) 


SUSPEND INTERACTIVE 


This statement deactivates the program control keys (such as 
STEP and PAUSE). 


SUSPEND INTERACTIVE 
SUSPEND INTERACTIVE sRESET 


SWEDISH 
See LEXICAL ORDER IS. 


SYMBOL Requires GRAPHX 


This statement allows labelling with user-defined symbols. 


SYMBOL My_char(#) 
SYMBOL Logo{#);FILL+EDGE 


SYSBOOT 


This command returns control to the BOOT ROM to restart 
the system selection and configuration process. 


SYSBOOQT 


82 



































SYSTEM PRIORITY 


This statement sets the system priority to a specified level. 


SYSTEM PRIORITY Level 
SYSTEM PRIORI Ei id 


SYSTEM$ 


This function returns a string containing system status and 
configuration information. 


Memory=VAL(SYSTEM$("AYVATLABLE MEMORY") ) 
IF SYSTEM$("TRIG MODE")="RAD" THEN Radian 


The following requests are allowed. 


AVAILABLE MEMORY 
CRT ID 

DUMP DEVICE IS 
KBD LINE 

MASS MEMORY 
MASS STORAGE IS 
MSI 

PRINTALL IS 
PRINTER IS 

SERIAL NUMBER 
SYSTEM ID 

SYSTEM PRIORITY 
TRIG MODE 
VERSION: BASIC or < binary name> 


Requires GRAPH . 
GRAPHICS INPUT IS 
PLOTTER IS 
Requires LEX 


KEYBOARD LANGUAGE 
LEXICAL ORDER IS 
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TAB 
See PRINT and DISP. 


TABXY 
See PRINT. 


TALK 
See SEND. 


TAN 


This function returns the tangent of the angle represented by 
the argument. 

Tangent=TAN(Angle) 

PRINT "Tangent of * SFE" ="FTANCZ) 


TIME Requires CLOCK 


This function converts a formatted time-of-day string into a 
numeric value of seconds past midnight. 


Seconds=TIME( TS) 
SET TIME TIME("8:37:30") 


TIMES Requires CLOCK 


This function converts the number of seconds past midnight 
into a string representing the formatted time of day 


(HH:MM:SS). 


PRINT “It is "STIMES(TIMEDATE) 
IF YAL(TIMES(T1)) 317 THEN Overtime 


TIMEDATE 


This function returns the current value of the real-time clock. 


Elapsed=TIMEDATE-T® 
DISP TIMEDATE MOD 86400 


TIMEOUT 
See OFF TIMEOUT and ON TIMEOUT, 
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TRACE ALL Requires PDEV 


This statement allows tracing program flow and variable 
assignments during program execution. Trace output is sent 
to the system message line and (if PRINTALL is on) to the 
PRINTALL device. 


TRACE ALL Sort 
TRACE ALL Labelirlabele 
TRACE ALL 1500,2450 


TRACE OFF Requires PDEV 
This statement turns off all tracing activity. 

TRACE OFF 

TRACE PAUSE Requires PDEV 


This statement causes program execution to pause before 
executing the specified line, and displays the next line to be 
executed on the CRT. Tracing slows program execution. 


TRACE PAUSE 
TRACE PAUSE 330 
TRACE PAUSE Loop_end 


TRACK Requires GRAPHX 


This statement enables or disables tracking of the current 


locator position on the current display device. See 
GRAPHICS INPUT IS and PLOTTER IS. 


TRACK Display IS ON 
TRACK 709 IS OFF 


TRANSFER Requires TRANS 


This statement initiates unformatted I/O transfers, which can 
take place concurrently with continued program execution. 
Every TRANSFER needs a buffer as either its source or its 
destination (but not both). 


TRANSFER @Device TO @Buff 

TRANSFER @Buff TO @FilesCONT 

TRANSFER @Source TO @BuffyiDELIM "/" END 
TRANSFER @F TO @BSRECORDS 12,E0R(COUNT 8) 
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TRIGGER Requires 1O 


This statement sends a trigger message to a selected device, 
or to all devices addressed to listen, on the HP-IB. 


TRIGGER 712 
TRIGGER Device 
TRIGGER @HPib 


TRIM$ 


This function returns a string formed by stripping all leading 
and trailing blanks from the argument. 


LeftSsTRIMG(" center sa 
Clean$=TRIMS(User_inrut?) 
See MAT. 


UNL 
See SEND. 


UNLOCK Requires SRM 


This statement is used to remove exclusive access to a re- 
mote file which was placed by the LOCK statement. 


UNLOCK @File 
IF Done THEN UNLOCK @File 


UNT 
See SEND. 


UNTIL 
See REPEAT...UNTIL. 


RA 














UPC$ 


This function returns a string formed by replacing any lower- 
case characters with the corresponding uppercase charac- 
ters. 


Capital$=UPC$(Mixed$) 
IF UPCSi¥ess)="¥" THEN True_test 


USING 
See DISP, ENTER, LABEL, OUTPUT, and PRINT. 


V 
VAL 


This function converts a string expression into a numeric 
value. 


Day=VAL(Date$) 
IF VAL(Response$)<O THEN Negative 


VAL$ 


This function returns a string representation of the value of 
the argument. The returned string is in the default print for- 
mat, except that the first character is not a blank for positive 
numbers. No trailing blanks are generated. 


PRINT Esc#s3VAL$(Cursor-1) 
Srecialg=TextS&VALS(Number) 


VIEWPORT Requires GRAPH 


This statement defines an area (in GDUs) onto which WIN- 
DOW and SHOW statements are mapped. It also sets the 
soft clip limits to the boundaries it defines. 


VIEWPORT 0,:35+50,80 
VIEWPORT Left:RightsBottom:Top 
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WAIT 


This statement will cause the computer to wait approximate- 
ly the number of seconds specified before executing the next 
statement. 


WAIT 3 
WAIT Seconds/2 


WAIT FOR EOR Requires TRANS 


This statement waits until an end-of-record event occurs dur- 
ing a TRANSFER on the specified I/O path. 


WAIT FOR EOR @File 
WOIT FOR EGR @Device 


WAIT FOR EOT Requires TRANS 


This statement waits until the TRANSFER completes on the 
specified I/O path. 

WAIT FOR EQT @File 

WAIT FOR EQT @Device 


WHERE Requires GRAPHX 


This statement returns the current logical position of the pen. 


WHERE Kuposs¥_Pas 
WHERE Xi ¥sStatus$ 


WHILE 


This construct defines a loop which is repeated until the ex- 
pression in the WHILE statement evaluates to false (zero). 


330 WHILE Sizes=Minimum 
340 GOSUB Process 

350 Size=Size/Scaling 
360 END WHILE 


WIDTH 
See PRINTALL IS and PRINTER IS. 
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WINDOW Requires GRAPH 


This statement is used to define an anisotropic current unit- 
of-measure for graphics operations. 


WINDOW -5,5 0-100 
WINDOW LeftsRight+Bottom,Tor 


WORD 
See ASSIGN. 


WRITEIO 


This statement writes an integer representation of the regis- 
ter-data to the specified hardware register on the specified 
interface. 


WRITEIG 12+0:Set_petl 
WRITEIO Isc ReagisteriReg data 


X 


XREF Requires XREF 


This command produces a cross-referenced listing of the 
identifiers in a program or subprogram. The final optional 
parameter may be any one of the following: 


CM Common Block Names 

10 1'O Path Names 

LL Line Labels 

LN Line Numbers 

NF Numeric Functions 

NV Numeric Variables 

SB SUB Subprograms 

SF String Functions 

Sy String Variables 

UN Unused Entries 
XREF 


AREF #PRT 
XREF #701 3FNUse rs 
XREF MAIN: NY 
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LESS See eee eer 


I/O Path Status 
and Control Kegisters 


Example Statements 
STATUS @Path>»RegisteriVariatlie 
CONTROL @Path +» Registers¥alue 
For All /O Path Names: 
Status Register 0 


Returned 





Value Meaning 
0 Invalid I/O path name 
1 1/O path name assigned to a device 
Z 1/O path name assigned to a data file 
3 | /O path name assigned to a buffer 


l/O Path Names Assigned to a Device: 


Status Register 1 Interface select code 
Status Register 2 Number of devices 
Status Register 3 lst device selector 


If assigned to more than one device, the other device selec- 
tors are available starting in Status Register 4. 


1/O Path Names Assigned to an ASCII File: 
Status Register 1 File type = 3 


Status Register 2 Device selector of mass storage 
device 

Status Register 3 Number of records 

Status Register 4 Bytes per record = 256 

Status Register 5 Current record 


Status Register 6 Current byte within record 


I/O Path Names Assigned to a BDAT File: 
Status Register 1 File type = 2 


Status Register 2 Device selector of mass storage 
device 
Status Register 3 Number of defined records 





Status Register 4 Defined record length 


An QI 




















I/O Path Status | 
and Control Registers (cont.) 


Status Register 5 
Control Register 5 


Status Register 6 
Control Register 6 


Status Register 7 
Control Register 7 


Status Register 8 
Control Register 8 


Current record 
Set current record 


Current byte within record 
Set current byte within record 


EOF record 
Set EOF record 


Byte within EOF record 
Set byte within EOF record | 


VO Path Names Assigned to a Buffer: 


Status Register 1 


Status Register 2 


Status Register 3 
Control Register 3 


Status Register 4 
Control Register 4 


Status Register 5 
Control Register 5 


Status Register 6 


Status Register 7 


Status Register 8 


Control Register 8 


Status Register 9 


Control Register 9 


Status 10, 11 


Status Register 12 


Status Register 13 


Buffer type (1 = named, 
2 = unnamed) 
Buffer size in bytes 


Current fill pointer 
Set fill pointer 


Current number of bytes in buffer 
Set number of bytes 


Current empty pointer 
Set empty pointer 


Interface select code of inbound 


TRANSFER 


Interface select code of outbound 


TRANSFER 


lf non-zero, inbound TRANSFER is 


continuous 
Cance! continuous mode inbound 


TRANSEER if zero 


If non-zero, outbound TRANSFER 
is continuous 
Cancel continuous mode outbound 
TRANSFER if zero 
(see next page) 


Total number of bytes transferred by 


last inbound TRANSFER 
Total number of bytes transferred 
by last outbound TRANSFER 


OZ 


| 


4 


Match 
| Character 
Bit @ 


Value = 


sata 


Least Significant Bit 


Least Significant Bit 


2 


inbound Termination 
Outbound Termination 


Bi 


Value = 4 


Value = 


Count 














at 8 





Device 
Termination 
Value 





TRANSFER 
Error 


32 | Value = 1 


| 


J 








TRANSFER 
Aborted 
Aborted 





TRANSFER 
oe 


m2 


= 


: Value ca 64 | Value ae 


Fa 


| 
| 
i 


: =v 


Value = 128 


i 


| 
| 
sl 





alue = 12 














Status Register 11 


Status Register 10 
Most Signihcant Bit 


Most Significant Bi 


—— 


| 





: 


| 
i 
br 
| 




















Status Register 6 
Control Register 6 


CRT Status 
and Control Registers 


Example Statements Status Register 7 


Control Register 7 
STATUS 1l+RegisteriVariable 


CONTROL LoRegisteriValue Status Register 8 


Control Register 8 


Current print position (column) 
Set print position (column) 


Status Register 0 
Control Register 0 


Status Register 9 
Control Register 9 
Current print position (line) 
Set print position (line) 


Status Register 1 
Control Register 1 


Status Register 10 
Control Register 10 
Insert-character mode 

Set insert character mode if non-0 


Status Register 2 
Control Register 2 


Status Register 1] 
Control Register 11 


Number of lines “above screen” 
Undefined 


Status Register 3 
Control Register 3 


Display functions mode 
Set display functions mode if non-0 


Status Register 4 


Control Register 4 Status Register 12 


Return default alpha color Control Register 12 


Set default alpha color: 


Status Register 5 
Control Register 5 


For Alpha Displays: 





Value | Result Value | Result" 
< 128 Error 140 | Cyan 
128-135 | Ignored 141 | Blue Status Register 13 
136 White 142 | Magenta Control Register 13 
Ta? Red 143 Black 
138 Yellow 144-159 | Ignored 
139 Green > 159 Error 





For Bit-mapped displays: Values 0 
thru 255 which correspond to the 
graphics pens. 





For multi-plane bit-mapped displays, 
the graphics pen to be used for alpha. 





CONTROL CRT >5 in sets the values 
of the CRT registers 15, 16, and 17, 
but not vice-versa. 
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ALPHA ON flag 
Undefined 


GRAPHICS ON flag 
Undefined 


Display line position (column) 
Set display line position (column) 


Screenwidth (number of characters) 
Undefined 


Cursor-enable flag 
Cursor-enable: 

O = cursor invisible 
non-Q = cursor visible 


| 


CRT character mapping flag 
Disable CRT character mapping if 
non-OQ 


Key labels display mode 

Set key labels display mode: 

Q = typing-aid key labels displayed 
unless program is in the RUN 
state 


1 = key labels always off 
2 = key labels displayed at all times 
CRT height 


CRT height; number of lines in alpha 
display must be greater than 8. 
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Status Register 14 
Control Register 14 


Status Register 15 


Control Register 15 


Status Register 16 


Control Register 16 


Display replacement 


Display replacement: Status Register 17 











QO -— 0 

1 — source AND old 

2 — source AND NOT old 

3 — source; default Control Register 17 
4 — NOT source AND old 

5 — old 

6 — source EXOR old 

7 — source OR old 

8 — source NOR old Status Register 18 
9 — source EXNOR old 

10 ~ NOT old Control Register 18 
11 — source OR NOT old 

12 - NOT source Status Register 19 
13 ~— NOT source OR old 

14 — source NAND old 

is -] Control Register 19 


Status Register 20 


Return the value set (or the default) 
for the color in the PRINT/DISP 
area. 


Control Register 20 


Status Register 21 
Set PRINT/DISP color. Similar to 
CRT control register 5 but specific to J 
CRT PRINT/DISP areas. 


Control Register 21 


Return the value set (or the default) 
for the softkey label color. 


Set key labels color. Does not affect § 
the areas covered by CRIT registers 
15 and 17. 
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Return the value set (or the default) 
for the color keyboard entry line, run- 
light, system message line, annun- 
ciators, and edit screen. 


Set color of the keyboard entry line, 
runlight, system message line, annun- 
ciators, and edit screen. Does not 
affect the areas covered by CRT con- 
trol registers 15 and 16. 


Read the alpha write-enable mask. 


Set alpha write-enable mask to a bit 
pattern, 


Return number of planes in alpha 
CRi. 


Undefined. 
Read the alpha display-enable mask. 


Set alpha display-enable to a bit pat- 
tern. 


Return compatibility mode(O or 1). 


Switch between the CRT compatibil- 
ity mode (value #0) and the native 
bit-mapped mode (value = 0). 


oy 
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STATUS 2 sRedgisteriVariatle 
CONTROL 2 RegisteriValue 


Status Register 0 
Control Register 0 


Status Register l 
Control Register 1 


Status Register 2 


Control Register 2 


Status Register 3 
Control Register 3 


Status Register 4 
Control Register 4 


Status Register 5 


Control Register 5 
Status Register 6 


Control Register 6 


Status Register 7 
Control Register 7 


Keyboard Status 
and Control Registers 


Example Statements 


CAPS LOCK flag 
Set CAPS LOCK if non-0 


PRINTALL flag 
Set PRINTALL if non-0 


Function key menu. 

O= System menu 

1-3 = User menu 1 thru 3 
Set function key menu 


Undefined 
Set auto-repeat interval. If 1 thru 
255, repeat rate in milliseconds is 10 
times this value. 256 = turn off auto- 


repeat. (Default at power-on or 
SCRATCH A is 80 ms.) 


Undefined 

Set delay before auto-repeat. If 1 
thru 256, delay in milliseconds is 10 
times this value. (Default at power-on 


or SCRATCH A is 700 ms.) 


KBDS$ buffer overflow register. 
1 =overflow. Register is reset when 
read. 

Undefined 


Typing aid expansion overflow regis- 
ter. 1=overflow. Register is reset 
when read. 
Undefined 


See table on next page. 
See table on next page. 
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Interrupt Status 


Status Register 7 
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Interrupt Disable Mask 


Contro} Register 7 (Set bit to disable) 


Most Significant Bit 












Least Significant Bit 
Keyboard 
and Knob 
Value = 7 


Value = 2 


Reserved 
For Future 
Use 








= 8 


Reserved 
For Future 
Use 





INITIALIZE 
Timeout 









Bit 6 ‘| Bit 5 | Bit 4 






Not Used 
Value = 128] Value = 64 | Value = 39 | Value = 16} Value 





Keyboard Status 
and Control Registers (cont.) 


Status Register 8 


Keyboard Language 


O=USASCIL 6=CanadianEnglish 13 =Swiss German 
1 =French 7 = United Kingdom 14= Latin (Spanish) 
2 =German 8 = Canadian French 15 = Danish 
3 = Swedish 9 = Swiss French 16= Finnish 
4 = Spanish 10 = Italian 17 = Norwegian 
5 = Katakana 11 = Belgian 18 = Swiss French* 
12 = Dutch 19 = Swiss German* 
Control Register 8 Undefined 
Status Register 9 See table on next page. 
Control Register 9 Undefined 
Status Register 10 See table on next page 
Control Register 10 Undefined 


Status Register 11 
Control Register 11 


Status Register 12 
Control Register 12 


Status Register 13 


Control Register 13 
Status Register 14 


Control Register 14 


Status Register 15 


Control Register 15 


O = horizontal-pulse mode: 1 = all- 
Q = horizontal-pulse mode: 1 = all- 
pulse mode (default is 0 without 
KNB2__0 loaded, 1 with KNB2__0 
loaded) Refer to the Knob section in 
Chapter 15 of the BASIC Program- 
ming Techniques manual for more in- 
formation. 


‘‘Pseudo-EOI for CTRL-E”’ flag 


Enable pseudo-EO! for CTRL-E if 
non-O 


Katakana flag 
Set Katakana if non-0 


Function keys on HP46020A soft- 
ware key numbers shifted. 
Function keys on HP46020A soft- 


ware key numbers shifted. 0 = 
is Key 1 (default); 1=(_f1_) is Key 0 


Return keyboard compatibility mode 
{O-off, lon). 


Turns Model 236 keyboard compati- 
bility mode on (#0) and off (= 0). 
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Status Register 9 


Mest Significant Bit 


Least Significant Bit 
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State at Last Knob Interrupt 


Status Register 10 


Most Significant Bit 
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| Value = 1 
So oS i nt a ii 





Least Significant Bit 


oe 
a 
+ 


CTRL 
Key 
Pressed 
Value = 2 








Value = 4 


C 
: 


Value = 8 





Bit 5 
@ 


= 64 | Value = 32 | Value = | 
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Pseudo Select Code 32 
Status and Control Registers 


Status Register 0 
Control Register 0 
Status Register 1 
Control Register 1 


Status Register 2 


Control Register 2 


Parity checking; 0=off, 1=on. 
Sets parity checking; 0= off, 1 =on. 
Cache: 0= off, 1=on. 

Sets cache; 0= off, 1 =on. 


Floating point card/68881 floating 
point coprocessor; O= off, 1 =on. 


Sets floating point card/68881 float- 
ing point coprocessor; 0 = off, 1 =on. 
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Second Byte 
of Non-ASCII Key Codes 


Non-ASCII keypresses can be simulated by outputting a 2- 
byte sequence to the keyboard. The decimal value of the 
first byte is 255. The interpretation of the second byte is 
shown in this table. | 


> 


To 
—~4 
x 
co 


e 


(Next_) 


Ignored 


OQ Whe & 


Co 
m 
ER Es Ses 
= 


0) 





l These characters cannot be generated by pressing the CTRL key and a non- 
ASCH key. If one of these characters follows CHR$(255} in an output to the 


keyboard, an error is reported 
{Error 131 Bad non-alrphanumeric Keycode), 


id2 








9 
(SHIFT) -system(_f6_)? 
-system(_f7_)? 


m m 


. a] may 


-( RECALL 
( BACK SPACE ) 


wn 
ra 
to 
Ops 
mm SHOWS 
> = x4 
cone = 
m zl iQils> 
a lige fii 
Mies | 7 
rm 


o 
aw 
“a 
x» 
—e 
1 
oO 
~~ 
= 
cf 


| id 
=| | 
alg 
AL 


oO 
2 
2 
oO 


Katakana Mode 


(GRAPHICS) 
(ALPHA) 
DUMP GRAPHIC 
(DUMP ALPHA ) 
oe 


CRUN } 


STEP 


SHIFT) -(_ 


1 These characters cannot be generated by pressing the CTRL key and a non- 
ASCII! key. If one of these characters follows CHR$(255) in an output to the 
keyboard, an error is reported 
(Error 131 Bad non-alehanumeric Kercode.}. 


e 
A 
B 
LG 
D 
E 
F 
G 
H 
I 
J 
K 
L. 
M 
N 
0 
P 
t) 
IX 
5 
. 





2 System and user refer to the softkey menu which is currently active. 
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Second Byte of 


Non-ASCII Key Codes (cont.) 






0 


(SHIFT) -system(_f1_)? 
(SHIFT) -system(_f2_)? 
(SHIFT) -system(_#3_)? 
(SHIFT) -system(_f4_)” 
(SHIFT) -user(_ft_)? 
SHIFT }-user{ 2 }* 
SHIFT }-user|_ £3 
SHIFT j-userl £4 
SHIFT j-userl _f6 
SHIFT }-userl_f6 
SHIFT | -userl_f7 


SHIFT j-userl f8 
System 


















o 
> 
~~ 
wa 
r- 
Go 
co 
~*~ 


a 


4 
u 
Be 


SHIFT } - 
EXECUTE 


Koman Mode 
1 


Jt ha nN he 


2 


2 


oo 
r 
a 
—4 
x 
aw 


- 


wn 
eI 
> 
oo 


User 


= 
7 
“ 





q 


oH 


1 


art} 
sant Tf mn 
Mm} f— 


aa 


ep oa Sa ae a 
to | ico HM Liat it | too 





1 These characters cannot be generated by pressing the CTRL key and a non- 
ASCII key. Hf one of these characters follows CHR$(255) in an output to the 
keyboard, an error is reported 
(Error 131 Bad non-alephanumeric kKeycode.). 


1 These characters cannot be generated by pressing the CTRL key and a non- 
ASCII key. If one of these characters follows CHR3(255) in an output to the 
keyboard, an error is reported 


{Error 131 Bad non-alphanumeric Kerycode-}. 2 System and user refer to the softkey menu which is currently active. 
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Error Messages 


Configuration error 





or 
Missing option <BIN number> (without ERR BIN) 
or 
Missing option <BIN name> (with ERR BIN) 


Memory overflow. 

Line not found in current context. 
Improper RETURN. 

Improper context terminator. 
Improper FOR...NEXT matching. 
Undefined function or subprogram. 
improper parameter matching. 
Improper number of parameters. 
String type required. 

Numeric type required. 

Attempt to redeclare variable. 
Array dimensions not specified. 
OPTION BASE not allowed here. 
Invalid bounds. 

Improper dimensions. 

Subscript out of range. 

String overflow or substring error. 
Improper value or out of range. 
INTEGER overflow. 

REAL overflow. 

Trigonometric argument too large. 


Absolute value of ASN or ACS argument is greater 
than 1. 


Zero to negative power. 


Negative base to non-integer power. 


116 









LOG or LGT of a non-positive number. 
Illegal floating point number. 
SOR of a negative number. 
Division (or MOD} by zero. 
String does not represent a valid number. 
Improper argument for NUM or RPTS. 
Referenced line not an IMAGE statement. 
Improper image. 

Out of data in READ. 

TAB or TABXY not allowed here. 
Improper REN command. 

First line number greater than second line number. 
Matrix must be square. 

Result matrix cannot be an operand. 

No binary for STORE BIN or no program for SAVE. 
Improper COM declaration. 

Branch destination not found. 

File not currently assigned. 

Improper mass storage unit specifier. 
Improper file name. 

Duplicate file name. 

Directory overflow. 

File name is undefined. 

Improper file type. 

End of file found. 

End of record found in random mode. 
Protect code violation. 


Mass storage media overflow. 
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65 
66 
67 
68 
72 
73 
76 
77 
78 





80 


81 
82 
83 
84 
85 
87 
88 
89 
90 
93 
100 
101 
102 
103 
105 
106 
107 


Incorrect data type for graphics operation. 
INITIALIZE failed. 

Improper mass storage parameter. 

Syntax error occurred during GET. 

Dise controller not found or improper address. 
Improper device type in mass storage unit specifier. 
Incorrect unit code in msus. 

Attempt to purge an open file. 


Improper mass storage volume label. 


’ os fa Be. 
: hypo" a oh 
File open on target device. UYe 2 ype 
= ao fp: Ge 


Media changed or not in drive. 

Mass storage hardware failure (or disc not turning). 
Mass storage unit not present. 

Write protected. 

Record not found. 

Media not initialized. 

Record address error. 

Read data error. 

Checkread error. 

Mass storage system error. 

Incorrect volume code in MSUS. 

Numeric image specifier for string item. 
String image specifier for numeric item. 
Numeric field specifier is too large. 

Item has no corresponding image specifier. 
Numeric field specifier is too small. 
Exponent field specifier is too small. 


Sign specifier missing from image. 
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117 
118 
120 
121 
122 
126 
127 
128 
131 
132 
133 
134 
135 


136 
140 
141 
142 
143 
145 
146 
150 
152 
153 
154 
155 
156 
157 


Too many nested structures. 

Too many structures in context. 

Not allowed while program running. 

Line not in main program. 

Program is not continuable. 

Quote mark in unquoted string. 
Improper sequence of KNOB statements. 
Line too long during GET. 

Improper non-ASCII keycode. 

Keycode buffer overflow. 

DELSUB of non-existent or busy subprogram. 
Improper SCRATCH statement. 


READIO or WRITEIO to non-existent memory loca- 
tion. 


REAL underflow. 

Too many symbols in the program. 

Variable cannot be allocated. 

Variable not allocated. 

Reference to missing OPTIONAL parameter. 
May not build COM at this time. 

Duplicate label in context. 

Improper interface select code or device selector. 
Parity error. 

Insufficient data for ENTER. 

String greater than 32 767 bytes in ENTER. 
Improper interface register number. 
Improper expression type in list. 


No ENTER terminator found. 
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158 
159 
160 
163 
164 
165 


167 
168 
170 
iit 
172 
173 
174 
177 
178 
301 
303 
304 
306 
308 
310 
313 
314 
315 
316 
317 


Improper image specifier. 

Numeric data not received. 

Too many digits in number. 
Interface not present. 

Illegal ASSIGN of WORD attribute. 


Image specifier greater than dimensioned string 
length. 


Interface status error. 

1/O timeout. 

1/O operation not allowed. 

Illegal 1/O addressing sequence. 
Peripheral (PSTS) error. I/O device failure. 
Active or system controller required. 
Nested I/O prohibited. 

Unidentified I/O path name. 

Trailing punctuation in ENTER. 

Cannot do while connected. 

Cannot do while trace active. 

Too many characters without a terminator. 
Interface card failure. 

illegal character in data. 

Not connected. 

USART receive buffer overflow. 

Receive buffer overflow. 

Missing data transmit clock. 

CTS false too long. 


Lost carrier disconnect. DSK and/or DCD inactive too 
long. 
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318 
319 
324 
325 
326 
327 
328 
330 


331 
332 
333 
334 


335 
337 
338 
340 
341 
342 


343 
344 
345 
346 
347 
349 
353 


No activity disconnect. 

Connection not established. 

Card trace buffer overflow. 

Illegal data bits/parity combination. 
Register address out of range. 
Register value out of range. 
USART transmit underrun. 


User-defined LEXICAL ORDER table size exceeds 
array size. 


MAT REORDER vector has repeated subscripts. 
Non-existent dimension given for MAT REORDER. 
improper subscript in MAT REORDER vector. 


Vector size not equal to number of elements for MAT 
REORDER. 


Pointer for MAT REORDER is not a vector. 
Substring key out of range. 

Key subscript out of range. 

LEXICAL ORDER mode table is too long. 
Improper LEXICAL ORDEK mode indicator. 


LEXICAL ORDER mode table is not an INTEGER 
vector. 


LEXICAL ORDER mode pointer out of range. 
LEXICAL ORDER 1-for-2 list is wrong size. 
CASE expression type mismatch. 

INDENT parameter out of range. 

Structures improperly matched. 

CSUB has been modified. 


Data link failure. 
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369-399 Run-Time Pascal error during a CSUB. Subtract 
400 from BASIC error number and refer to the 
Pascal Workstation System manual. 


BYTE/WORD attribute cannot be modified. 
Improper CONVERT lifetime. 

Improper BUFFER lifetime. 

Variable was not declared as a BUFFER. 


401 Bad system-function argument. 

403 COPYLINES or MOVELINES failed; program mod- 
ification incomplete. Improper source or destination for TRANSFER. 

427 Priority may not be lowered. 

450 Volume not found (SRM). 


451. Volume labels do not match (SRM). 


BDAT file type required. 
Improper TRANSFER parameters. 
Inconsistent attributes. 

IVAL or DVAL result too large. 
BUFFER pointers in use. 


453 File in use (SRM). 
454 Directory formats do not match (SRM). 


455 Possibly corrupt file (SRM). improper plotter specifier. 


456 Unsupported directory operation (SKM). CRT graphics hardware missing. 


457 Passwords not supported (SRM). Upper bound not greater than lower bound. (P2<P1 


or VIEWPORT/CLIP conflict) 


458 Unsupported directory format (SRM). 
VIEWPORT or CLIP beyond hard clip limits. 


459 Specified file is not a directory (SRM). 
Device not initialized. 


460 Directory is not empty (SRM). 
Request not supported on specified graphics device. 


461 Duplicate passwords not allowed. : 
GESCAPE operation not recognized. 
462 Invalid password (SRM). 
Undefined typing-aid key. 
465 Invalid rename across volumes (SRM). 
Typing-aid memory overflow. 


471 TRANSFER not supported by the interface. 
Must delete entire context. 


481. File locked or opened exclusively (SRM). 
No room to renumber. 


482 Cannot move a directory with a RENAME operation 
(SRM}. 


483 System down (SRM). 

484 Password not found (SRM). 

485 Invalid volume copy (SRM). 

488 DMA hardware required. 

511 Result array for MAT INV must be REAL. 


Attempt to find a null string. 

CHANGE would produce too long a line. 
SUB or DEF FN not allowed here. 

May not replace SUB or DEF FN. 
Identifier not found in this context. 


Improper I/O list. 
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920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
930 
931 
932 
935 
936 
937 
939 
940 
942 
943 
946 
947 
948 
949 
950 
951 
961 


Numeric constant not allowed. 
Numeric identifier not allowed. 
Numeric array element not allowed. 
Numeric expression not allowed. 
Quoted string not allowed. 

String identifier not allowed. 
String array element not allowed. 
Substring not allowed. 

String expression not allowed. 
/O path name not allowed. 
Numeric array not allowed. 
String array not allowed. 


Excess sort keys specified. 


identifier is too long: 15 characters max. 


Unrecognized character. 
Invalid OPTION BASE. 
OPTIONAL appears twice. 
Duplicate formal parameter name. 
Invalid I/O path name. 

Invalid function name. 
Dimensions are inconsistent. 
Invalid array bounds. 

Multiple assignment prohibited. 
This symbol not allowed here. 
Must be a positive integer. 
Incomplete statement. 


CASE expression type mismatch. 
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962 


963 
977 
980 
982 
983 
985 
987 





re STI eS ENN EG EE Ea RENT e resNR ye ee cmomrCa EST on 
SES = = SF ROSIER 


Programmable only: cannot be executed from the 
keyboard. 


Command only: cannot be stored as a program line. 
Statement is too complex. 

Too many symbols in this context. 

Too many subscripts: 6 dimensions max. 

Wrong type or number of parameters. 

Invalid quoted string. 


Invalid line number: only integers 1 thru 32 766 
allowed. 


Lo 











EQUIVALENT FORMS 


















































































Char. Dec 
NUL |00000000}000} 00 | 0 | 
See ecueconlee: Cpa 
stx |90000010/002| 02 | 2 ' 1901000101042] 22 | 
ETX |00000011}003} 03) 3 | | # 100100011}043 | 
EOT |00000100|004| 04] 4 | | $ 100100100/044) 24 | 
ENQ |o00001011005| 05 | 5 | | % joot00101/045/ 25 | 
ACK [o0000110/006/ 06} 6 | | & 100100110/046 | 
BEL |00000111/007| 07 | 7 “ 190100111/047 | 
BS |00001000/010] 08 | 8 (_ }00101000)050 28 | 40 
HT |00001001/011; 09 | 9 ) }00101001 051 29 | 41 
| LF [00001010/012| 0A | 10 x 001010 10)052 2A | 42 
| vT |o0001011/013] 0B | 11 + |00101011/053] 2B | 43 
| FF [oo00t100|014) oc | 12 , [001011001054 2 | 44 
CR |00001107/015; 0D} 13 - 100101101055} 2D) 451 
SO |o0001110/016! OF | 14 001011101056 2E | 46 
S! |00001111/017] OF | 15 / 00101111)057 | 47 
DLE |00010000}020] 10) 16 0 001100001060} 30) 48 
DC1 |o001000T1021] 11 | 17 1 {001100011061} 31 | 49 
pc2 joo010010]022| 121 18] | 2 }00110010/062| 32] so 
DC3 100010011/023] 13 | 19 | 3 }00110011/063| 51 
DC4 100010100/024; 14 | 20 4 {00110100/064 52 
NAK [000101011025] 15 | 21 | 5 1001101011065 53 
syn looo101 10/0261 16 | 22 6 |00110110/066 54 
ETB 100010111/027| 17 | 23 7 (001101111067 55 
CAN 100011000/030] 18 | 24 8 100111000/070 56 
EM [000110011031] 19 | 25 9 {001110011071 57 
SUB [00011010/032| 1A | 26 . |00111010}072 58 
| 000110111033 1B | 27 , [001110111073 59 
Bd ae 28 < [001111001074 


i 


001111011075 
> [00111110)076 
? (00111111)/077 


Po 
© 


000111011035) 1D 
0001111010361 1€ 
0001111110371 1F 





G 
© 








tad 
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EQUIVALENT FORMS 
Binary ;Oct 
40 | 64 








|01000000} 100 
}01000001/101 
01000010}102 
010000111103 
01000100/104 
|01000101/105 
010001101106 
01000111/107 
01001000/110 
010010011111 
010010101112 
01001011)113) 48 
01001100114] 4c 
01001101/115! 4D 
010011101116; 4E 
Aeniaaine 4F | 79] 
}01010000} 120} So 80 | 
101010001/121} 51 _ 


xronm Oo oO wm > 








Suu 





<r HR 















01010010}122)| 524 82 
01010011;/123} 53) 83 
01010100/124/ 54] 84) 
01010101/125) 55| 85 | 
01010110/126 | 
01010111}127 
01011000 
01011001 
01011010 
01011011 
01011100 
01011101 
01011110 
01011114 


<< C +A MW DO VO 2 






= 















EQUIVALENT FORMS 

~ |011000001140] 60 | 96 
011000011141] 61] 97 
011000101142} 62; 98 
01100011/143 ae 99 
}01100100}144] 64] 100 
011001011145] 65| 101 
f $01100110/146] 66 | 102 
g |01100111/147) 67] 103 
h [01101000]150] 68} 104 
i 101101001/151] 69] 105 
} |01101010/152] 6A] 106 
k 101101011/153] 6B] 107 


01101100/154;) 6C | 108 


oO Of O TF p 


m [011011011155] 6D! 109 
011011101156] 6E | 110 
011011111157] 6F | 1114 
011100001160] 70/112 
OFTPOOOWIGT 7414413 
1011100101162] 72/114 
011100111163] 731115 
741116 
T5112 
761118 


= Oe AD oO 


wn 


01110100164 
u 101110101/165 
¥v {01110110)166 


we 















w 101410111/167] 77|119 
x [011110001170! 78] 120 
y {01111001/171] 79] 121 
z {01111010/172] 7A] 122 
{ 1011110111173] 7B} 123 
| jo1111100/174| 7c} 124 
} 1011111011175) 70 125) 

01111110 7E| 126) 









i 
DEL 1011111141177 Teer 





a2] 
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